1. Составьте блок-схему алгоритма и программу для решения следующей задачи. Вычислить сумму чисел, которые вводятся с клавиатуры. Признак окончания ввода – ввод числа 100
Решение во вложении. var a,s:integer; begin s:=0; while a<>100 do begin read(a); s:=s+a; end; writeln(s); end.