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

Напишите решение пожалуйста к примеру(Найти сумму всех целых чисел от -10 до b (значение b вводится с клавиатуры; b>a))Программа PascalABC.net

  1. Ответ
    Ответ дан Аккаунт удален
    Если a -  это -10 :
    var b,i,s:integer;
    begin
    s:=0;
    read (b);
    if (b>-10) then
    begin
    for i:=-10 to b do
    begin
    s:=s+i;
    end;
    end;
    writeln (s);
    end.


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