Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Violetta711
16.09.2021 22:08 •
Информатика
Язык pascal. ввести х целых чисел. найти количество чисел, которые кратны трем(делятся на 3).
Ответ:
perrybazinga
30.07.2020 06:25
Программа на паскале внизу
0,0
(0 оценок)
Ответ:
zaurezhunus
30.07.2020 06:25
{ввод массива z}
...
for i:=1 to x do
if z[i] mod 3 = 0 then k:=k+1;
...
вывод k
0,0
(0 оценок)
Популярные вопросы: Информатика
sevara221
13.05.2021 23:04
№1. Напишите наибольшее целое число x, для которого истинно высказывание: НЕ (X 23). №3. Напишите наибольшее целое число x, для которого истинно высказывание: НЕ (X =...
tjcjdjf
28.01.2022 07:06
Между дачными посёлками Арбатское, Бунеево, Веснянка, Гремячье, Дымово построены дороги, протяжённость которых (в километрах) приведена в таблице. https://иванов-ам.рф/informatika_09_fgos/informatika_materialy_zanytii_09_fgos_sr_02.htmlэто...
polinka3089
10.11.2021 18:44
Дайте краткое описание. что такое: 1) достоверность 2) актуальность 3)понятность 4) полнота 5) полезность зарание !...
NeMaximilan
10.11.2021 18:44
Какой тип имеет переменная h, если после выполнения оператора write (h) на экран было выведено следующее: 1399? boolean integer shortint нет верного ответа...
Aloyna111
29.11.2020 15:18
Сильная лиза или слабая? из повести бедная лиза...
voolll
29.11.2020 15:18
1) определить максимальную валентность элементов № 12 и № 25 (по электронной структуре атомов). 2) написать электронное строение атомов элементов № 17 и № 21. представить...
romankulebyaki
29.11.2020 15:18
Нужно придумать рассказ, чтобы он начинался на букву с . не менее 20 предложений. надо, чтобы в рассказе говорилось о: 1) саде. 2) место событий - севастополь. 3) герои-...
Владислав15351
29.11.2020 15:18
Найти множество значений функции: у=1-2sin²x...
Bashirov12
29.11.2020 15:18
Морфемный разбор слов: растительность,выращенные,растаял,расстилается,расталкивает....
belkairi
29.11.2020 15:18
Si, mg, cl, n- найти энергетический уровень...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
...
for i:=1 to x do
if z[i] mod 3 = 0 then k:=k+1;
...
вывод k