Информатика, опубликовано 2018-08-22 18:30:11 by Гость
Составить программу на языке Паскаль если два числа положительные, то возвести оба числа в квадрат если оба числа отрицательные, то найти их модуль
Ответ оставил Гость
Var a,b: integer;
begin
readln(a,b);
if((aelse
begin
if((a>=0)and(b>=0) then writeln(a*a, , b*b)
else writeln(Заданные числа не соответствуют условиям);
end;
end.
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на