Задать вопрос
29 сентября, 09:24

Помогите

var k, s : integer;

begin

s:=0

k:=0

while k <30 do begin

k:=k+3;

s:=s+k;

end;

write (s);

end.

+5
Ответы (1)
  1. 29 сентября, 13:07
    0
    А с чем помочь-то надо?
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Помогите var k, s : integer; begin s:=0 k:=0 while k ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы