Паскаль, цикл while,
запрашивать числа до тех пор пока их сумма не станет > =100,вывести количество чисел

Question

Информатика: Паскаль, цикл while, запрашивать числа до тех пор пока их сумма не станет =100,вывести количество чисел ​

лина28051 · Answer

var a,b,c:integer;beginb:=0;while b =100 dobeginreadln(a);b+=a;c+=1;end;write(c);end....

Паскаль, цикл while, запрашивать числа до тех пор пока их сумма не станет > =100,вывести количество чисел ​