Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
нтпрои
31.01.2022 12:01 •
Информатика
вас ну в паскале, посчитайте количество 2-х значных чисел кратных 7 28 ! за ерунду буду банить!
Ответ:
Ернур150400
05.10.2020 03:55
// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(14.Step(7).TakeWhile(x->x<100).Count)
end.
Результат
13
0,0
(0 оценок)
Популярные вопросы: Информатика
MMMOZG
27.07.2020 08:53
Обьем куба равен 8,найти его площадь поверхности...
rizakovaarina
19.01.2020 04:26
А=120 деген не? B=деген не? D=true деген не ?...
vika3v
30.04.2020 22:14
7 класс СОР по Информатике ...
aleks1632
16.09.2021 07:57
Ұрлықтану қай жерде жүзеге асады ...
Skinner56825
16.04.2022 16:38
решить 2 уравнения 150у + 350 = 5600 : 7 (х + 52 345) : 201 = 345...
olgakunitskaya
30.07.2020 19:08
Решите для мальчиков ещё чуть чуть осталось...
Pygacev1959
15.05.2020 16:28
Время и место расселения хунну. 2) Хозяйство и занятия хунну. 3) Государственное устройство хунну....
Фаззан
24.11.2022 19:16
Вычислите массу кислорода, необходимую для горения 4г метана, если практический выход-78%. ...
крисс1233
17.07.2021 10:14
какую работу совершает двигатель за 15 минут при мощности 50вт?...
sashabelousoydf1w
29.12.2020 06:40
Ласточка — небольшая красивая перелетная птица, стремительная в полете, с длинными остроконечными крыльями. Хвост у ласточки «вилочкой». В народе ее ласково зовут «касаточка»....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(14.Step(7).TakeWhile(x->x<100).Count)
end.
Результат
13