Var
a,b,c:integer;
begin
a:=−35;
b:=abs(a);
writeln('abs(−35)=',b);
c:=sqr(b);
writeln('sqr(b)=',c);
c:=sqr(b+b);
writeln('sqr(b+b)=',c);
end.
При запуске программы вывод на экран:
abs(−35)=
sqr(b)=
sqr(b+b)=

25 Окт 2019 в 10:47
1 223 +1
0
Ответы
1

abs(−35)=35

sqr(b)=1225

sqr(b+b)=4900

25 Окт 2019 в 18:50
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир