Напишите программу на Паскале (цикл)
Приложения:
Ясный1:
Проверю твою программу, и она не работает:( и хотелось немного попроще, тк не было foreach у нас еще
И Range тоже не было, напиши пожалуйста, как то без них
Я и хочу, чтобы она была длиннее, с более простыми операторами, возможно не так выразился
Ответы на вопрос
Ответил AnonimusPro
1
var i: integer;
s: real;
begin
for i:=33 downto 1 do
s:=sqrt(s+i*3);
write(s);
end.
Новые вопросы