С клавиатуры вводят последовательность чисел до тех пор пока не будет введено число 3. Требуется найти сумму введенных чисел

Ответы:

Альбина Карпова

04-05-2011 06:39

var s, n: real;begin s := 0; n := 0; repeat s := s + n; readln(n); until n = 3; writeln(s);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя АНИТА ГОЛУБЦОВА

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «С клавиатуры вводят последовательность чисел до тех пор пока не будет введено число 3. Требуется найти сумму введенных чисел» от пользователя АНИТА ГОЛУБЦОВА в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!