решить задачу (на циклы) Найти сумму чисел, кратных 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

Елена Васильевна

Читать ответы

Виктор Щебетун

Читать ответы

Мутовкин Александр

Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
0 ответов
18.01.12
Вопрос задан анонимно
2 ответа
24.12.12
Вопрос задан анонимно