Program Primer;
Var
N,result : real;
Begin
Writeln('Введите значения переменной N');
Write('N=');
Readln(N);
Result := sqr((1+N)*9);
Writeln ('sqr((1+N)*9)', result:8:0);
Readln;
End.
Запусти Паскаль, введи данную программу, получи результат, если N=4.
Ответ:
Запусти Паскаль и введи программу:vara,b,c:integer;begina:=−26;b:=abs(a);writeln('abs(−26)=',b);c:=sqr(b);writeln('sqr(b)=',c);c:=sqr(b+b);writeln('sqr(b+b)=',c);end.При запуске программы вывод на экран:abs(−26)=sqr(b)=sqr(b+b)=