Думаю, на Паскале пойдет. var summa, k: longint; begin summa := 0; read(k); {Считываем первое число} while k <> 0 do begin summa := summa + k; read(k); end; write(summa); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
