Регистрация
Светлая26
10.01.2021 20:04
Информатика
Есть ответ 👍

ИНФОРМАЦИЯ ВОКРУГ НАС 1. Заполни таблицу
Примеры
Информационные процессы
Поиск
Сбор
Хранение
Передача
Использование
Преобразование​

181
487
Посмотреть ответы 1

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

марик11092
марик11092
4,8(72 оценок)
Var a,s: integer; begin s: =0; repeat read(a); if (a mod 6 = 0)and(a mod 10 = 6) then s: =s+a; until a = 0; write(s) end.

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