Задания.ру
Анонимно
5 часов назад

Найдите квадрат наибольшего из чисел a и b . Введите результат сравнения на экран . Записать программу на языке паскаль

Ответ

Анонимно
Program n1;
var a,b: real;
begin
write('введите а и b: ');
readln(a,b);
if a<b then writeln('наибольшее b; квадрат: ',b*b);
if a>b then writeln('наибольшее a; квадрат: ',a*a);
end.

Новые вопросы по Информатике

ДАЮ 20 БАЛЛОВ Дан фрагмент программы: m := 7 n := 5 p := 7 m := n - p p := m + p p := p - n Чему будут равны значения величин m и p после выполнения этого фрагмента?
5 - 9 классы
2 минуты назад
Пользователь клавиатуры вводит в минуту 60 знаков. Какое количество текстовой информации вводит этот пользователь за 5 минут в кодировке Unicode?
5 - 9 классы
5 минут назад
Составить алгоритм программы решения квадратного уравнения вида ах²+вх+с=0 .Решить задачу как в QBasic
10 - 11 классы
5 минут назад
Что тут не правильно?(15 баллов a- int(input ('20:')) if a&gt;=('18:') print ("доступ разрешен") else: print ("доступ запрещен")
5 - 9 классы
9 минут назад
Срочно 50 баллов даю Решите с объяснением Проверьте является ли частное от деления суммы четырех произвольных чисел, введенных с клавиатуры, на разность двух последних из них целым числом!!!
10 - 11 классы
9 минут назад