Напишите программу на Паскале (цикл)
Приложения:
BobbyFresnel:
Так уже есть решение и как раз с циклом: https://znanija.com/task/33553493
Проверю твою программу, и она не работает:( и хотелось немного попроще, тк не было foreach у нас еще
И Range тоже не было, напиши пожалуйста, как то без них
Что значит "не работает", если приложен скрин, где все работает? Не работает в твоих условиях? Так ты их не описываешь.
Если у вас не было foreach и range, то уже и не будет. Вас учат какой-то из древних версий и угадывать, какой именно, я не собираюсь. А ты не указал, какой.
И еще. В программировании "попроще" - практически всегда синоним "короче и выразительнее". Если ты хочешь получить программу вдвое длиннее, в которой надо гадать, что она делает, то это отнюдь не "попроще".
Я и хочу, чтобы она была длиннее, с более простыми операторами, возможно не так выразился
Ответы
Ответ дал:
1
var i: integer;
s: real;
begin
for i:=33 downto 1 do
s:=sqrt(s+i*3);
write(s);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
3 года назад
3 года назад
8 лет назад