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

Как решить задачу в Паскале (тема - оператор цикла с предусловием): "Найти сумму А кратных 11 натуральных чисел
Запишите.пожалуйста,решение.

  1. Ответ
    Ответ дан Gleb1Kosyrev
    var a,i,s,h:integer;
    begin;
    s:=0; //0 кратен любому числу
    h:=0;
    readln(a);
    while i<>a do
    begin;
    inc(i);
    s:=s+h;
    h:=h+11;
    end;
    writeln(s);
    end.
Самые новые вопросы