profile
Опубликовано 6 лет назад по предмету Информатика от Salenkaz

с клавиатуры вводятя числа, пока не будет введено делящееся на 5, посчитать сумму тех из них, которые больше 10​

  1. Ответ
    Ответ дан fominyfomin

    (pascal)

    var a,b:integer


    begin

    while a<>5 do

    begin

    read(a);

    if a>10 then b:b+a;

    end;

    write(b);

    end.


Самые новые вопросы