Написать программу на языке OBASIC следующих задач: а)Впишется ли квадрат площадью S в круг радиусом - id1350887020201213 от 1234567891241 13.12.2020 21:11

Question

Информатика: Написать программу на языке OBASIC следующих задач: а)Впишется ли квадрат площадью S в круг радиусом R? Б) Впишется ли квадрат площадью S в круг диаметром D? В) Впишется ли круг радиусом R квадрат площадью S? Г) Впишется ли круг площадью S в квадрат со стороной а? Д)Впишется ли квадрат со стороной а в круг площадью а? Е) Составить программу вычерчивания российского флага и Флага франции Решить след задачи: А) В одной группе 10101(2) студентов,а во второй 10111(2) студентов.Найти насколько во второй

1234567891241 · Accepted Answer

var
i,z,y,x: integer; // объявление переменных
begin // начало программы
writeln('Введите числа: '); // Вывод сообщения
readln(x,y); // Ввод чисел х и у с клавиатуры
while i <> y do     // Повторять цикл пока i не будет равно y
begin   // Вход в цикл
z:=z+x;   // z = z + x (при первом шаге получается 0 = 0 + х)
i:=i+1; // Увеличиваем счетчик цикла на 1
end;     // Выход из цикла
write(z);   // Вывод z (произведение х и у)
end.     // Конец программы

MOGZ ответил