Найдите квадрат наибольшего из чисел a и b . Введите результат сравнения на экран . Записать программу на языке паскаль
61
ОТВЕТЫ
Program n1;
var a,b: real;
begin
write(введите а и b: );
readln(a,b);
if alt;b then writeln(наибольшее b; квадрат: ,b*b);
if agt;b then writeln(наибольшее a; квадрат: ,a*a);
end.
var a,b: real;
begin
write(введите а и b: );
readln(a,b);
if alt;b then writeln(наибольшее b; квадрат: ,b*b);
if agt;b then writeln(наибольшее a; квадрат: ,a*a);
end.
202
Отв. дан
Kaza
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Хрисанф
Заданы стороны треугольника a b c . Определить , ...
2019-05-19 10:50:07
Neop
Если поменять буквы местами у слов: маяк-,кукла-,комар-,соринка-,водопад-.Пожалуйста помогите
...
2019-05-19 10:48:26
Moamardog
ПАСКАЛЬ 7 Найти сумму числ двузначного числа (допустим 25- ...
2019-05-19 10:47:50
Богоявленский
Определить истинность утверждений: третья буква латинского алфавита ,буква B ...
2019-05-19 10:45:49