gdz.top
Страница 179 - гдз по информатике 8 класс учебник Босова, Босова
Авторы: Босова Л. Л., Босова А. Ю.
Тип: Учебник
Издательство: Просвещение
Год издания: 2023 - 2025
Уровень обучения: базовый
Цвет обложки: синий с котом
ISBN: 978-5-09-102543-9 (2023)
Допущено Министерством просвещения Российской Федерации
Популярные ГДЗ в 8 классе
Cтраница 179
Страница 178
№8 (с. 179)
Условие. №8 (с. 179)
8. Напишите программу, предусматривающую ввод одного из чисел: 1, 2 или 3 — и построение на экране одной из трех геометрических фигур: треугольника, если введено число 1: квадрата, если введено число 2; окружности, если введено число 3.
Решение. №8 (с. 179)
uses GraphABC;
var
c: integer;
begin
writeln ('Введите число от 1 до 3');
readln (c);
if c=1 then
begin
line (1,1, 6, 1);
line (6,1, 3, 6);
line (3, 6, 1, 1);
end else
if c=2 then
rectangle (1, 1, 6, 6)
else
if c=3 then
circle (3, 3, 6);
end.
№9 (с. 179)
Условие. №9 (с. 179)
9. Дано натуральное трёхзначное число n. Разработайте, отладьте и протестируйте программу, определяющую:
а) является ли данное число «перевертышем» т. е. числом, десятичная запись которого читается одинаково слева направо и справа налево:
| Входные данные | Выходные данные |
| 122 | Нет |
| 121 | Перевертыш |
| 222 | Перевертыш |
б) есть ли среди цифр данного числа одинаковые:
| Входные данные | Выходные данные |
| 123 | Нет |
| 121 | Да |
| 222 | Да |
Протестируйте программу на приведенных исходных данных.
Решение. №9 (с. 179)
а)
var
a, b, n: integer;
begin
writeln ('Введите трехзначное число');
readln (n);
a:= n mod 10;
b:= n div 100;
if a=b then writeln ('Перевертыш')
else writeln ('Нет');
end.
б)
var
a, b, c, n: integer;
begin
writeln ('Введите трехзначное число');
readln (n);
a:= n mod 10;
b:= n div 100;
c:= n mod 100 div 10;
if (a=b) or (b=c) or (a=c) then
writeln ('Да')
else writeln ('Нет');
end.
№10 (с. 179)
Условие. №10 (с. 179)
10. Даны три натуральных числа. Разработайте, отладьте и протестируйте на приведённых данных программу, определяющую, существует ли треугольник с такими длинами сторон. Если такой треугольник существует, то определите его тип (равносторонний, равнобедренный, разносторонний). Для проверки правильности программы используйте тест:
| Входные данные | Выходные данные |
| a b c>>1 2 1 | Не существует |
| a b c>>2 2 2 | Равносторонний |
| a b c>>20 20 30 | Равносторонний |
| a b c>>3 4 5 | Разносторонний |
Решение. №10 (с. 179)
var
a, b, c: integer;
begin
writeln ('Введите три натуральных числа');
readln (a, b, c);
if not (((a+b)>c) and ((a+c)>b) and ((b+c)>a)) then
writeln ('Не существует')
else
if (a=b) and (b=c) and (a=c) then
writeln ('Равносторонний')
else if (a=b) or (b=c) or (a=c) then
writeln ('Равнобедренный')
else writeln ('Разносторонний');
end.
Помогло решение? Оставьте отзыв в комментариях ниже.