Напишите, пожалуйста программы для Pascal: 4. Вывести на экран первые 4 степени числа.…

Question

76

Напишите, пожалуйста программы для Pascal: 4. Вывести на экран первые 4 степени числа. В качестве значения использовать встроенную константу языка.5. Дано число N. Проверить истинность высказывания: «Число N является точным квадратом» .

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

saule · Accepted Answer

94

saule

20 августа 2022

Var i: integer; a: real; begin a: =1; for i: =1 to 4 do begin writeln ('pi^', i — 1, '=', a); a: =a*pi; end; end.var n: real; begin read (n); if trunc (sqrt (n)=sqrt (n) then writeln ('YES') else writeln ('NO'); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: