PASKAL1) Написать программу с циклом. Дана переменная "n", написать программу где все…

Question

78

PASKAL1) Написать программу с циклом. Дана переменная "n", написать программу где все значения "n" будут суммироваться пока n не будет равно 12) Написать программу с циклом. Дана переменная e, нужно выводить "e" в квадрат до тех пор пока "e" не будет равно 100-program test; var… begin

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

ответить

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

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

batsu · Accepted Answer

34

batsu

19 февраля 2023

Var i, n, s: integer; begin read (n); for i: =n downto 1 do s: =s+i; writeln (s); end.2) var i, e: integer; begin write ('e='); readln (e); if e > 100 then for i: =e downto 100 do writeln (i*i) else for i: =e to 100 do writeln (i*i); end.

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

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

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

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