Информатика, опубликовано 2018-08-22 20:16:05 by Гость

Даны два числа А и В.Найдите квадрат большего из них и, если это первое число, выведите "1", а если второе, то выведите "2". (А=5,В=7).Решите на паскале!!!!!!

Ответ оставил Гость

Program zz;
var a,b:integer;
begin writeln(Введите число A );
readln (a); writeln(Введите число  B ); 
readln (b); a:=a*a; b:=b*b; 
if a>b then writeln(a)       
          else writeln(b);
 if a>b then writeln(1)
       else writeln(2);
end.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.