решить задачу (на циклы) Найти сумму чисел, кратных 3, из отрезка от 5 до 35.

Ответы

Пример решения на языке PascalABCNET
var i: integer;
    s: real;
begin
S:=0;
    for i:=5 to 35 do
    begin
        if i mod 3=0 then s:=S+i;
    end;
    write('сумма=',s);
end.

Результат: сумма=195
15.09.16
Рекомендуем личную консультацию

Алексей

Сейчас на сайте
C/C++, Python, SQL, " Академическое программирование" , Prolog, статистика, теория вероятности, машинное обучение.
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
0 ответов
18.01.12
Вопрос задан анонимно
2 ответа
24.12.12
Вопрос задан анонимно