Две задачи в паскале 1) Подсчитать сумму вводимых с клавиатуры чисел до числа большего 11. 2) подсчитать сумму вводимых с клавиатуры чисел до числа не равного 7.
var k,a:integer;
begin
read(k);
while(k
a:=a+k;
end;
write(a);
end.
//2 задача
while(k<>7)do begin