Есть ответ 👍

Написать таблицу истинности F=Av(B^C) инфа 8 класс

104
429
Посмотреть ответы 1

Ответы на вопрос:

nastea3377
4,8(20 оценок)

// pascalabc.net // найти сумму чисел от 100 до 200 кратных 7. // подсчитать кол-во этих чисел. const       nach = 100;                                     // диапазон значений       kon = 200; var       n, s : integer;       begin       for var i : = nach to kon do            // проверяем все числа по порядку             if i mod 7 = 0 then begin      // если оно кратно 7, то                   s : = s + i;                         // производим подсчеты                   n : = n + 1             end;       write('сумма = ', s, '. количество - ', n) end.

Популярно: Информатика