Информатика, опубликовано 2018-08-22 21:05:38 by Гость

1)Составить программу(паскаль) вывода на экран всех нечетных двухзначных чисел. 2)составить программу вычисления суммы всех трехзначных чисел, кратных 5

Ответ оставил Гость

1)
var
    i: integer;

begin
    for i := 10 to 99 do
        if i mod 2 = 0 then
            write(i, );
end.

2)
var
    i, s: integer;

begin
    for i := 100 to 999 do
        if i mod 5 = 0 then
            s := s + i;
    writeln(s);
end.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.