Предмет: Информатика,
автор: яяяяя16
составте програму, которая вводит число с клавиатуры , и если оно отрицательное возводит его в квадрат
Ответы
Автор ответа:
0
var a:integer;
begin
writeln('Введите целое число');
read(a);
if a<0 then writeln('Квадрат ',a,'=',sqr(a))
else writeln('Число положительное');
end.
begin
writeln('Введите целое число');
read(a);
if a<0 then writeln('Квадрат ',a,'=',sqr(a))
else writeln('Число положительное');
end.
Автор ответа:
0
спасибо
Интересные вопросы
Предмет: Математика,
автор: jaslankizi
Предмет: Русский язык,
автор: templayd2289
Предмет: Экономика,
автор: pipidaster9
Предмет: Математика,
автор: DKlass2001
Предмет: Алгебра,
автор: tema14111