Войти
Регистрация
Спроси ai-bota
utochkins04
20.01.2020 04:17
Найти количество двузначных чисел оканчивающихся на 7. составить программу в pascal.
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
milenakotik44
26.01.2021 13:55
У исполнителя Бета две команды, которым присвоены номера: 1) прибавь 2; 2) умножь на b (b — неизвестное натуральное число; b ≥ 2). Выполняя первую из них, Бета увеличивает...
muy5
13.10.2022 17:13
Напишите программу на Паскале: С клавиатуры вводятся два произвольных числа. Компьютер выдает на экран сообщение о том, какое из чисел больше, либо они равны. Используйте...
vika2084
31.03.2022 09:49
Дан программный код. Сколько раз выполнится тело цикла? ПОДАОУЙСТА НУЖНО ...
Nataliya49017
05.02.2021 03:50
Напиши программу на языке Пайтон, если дана следующая блок-схема. https://cdn5.bilimland.kz/upload/files/sor/q3/L_3687289/603d185b4d26a.png...
Nobd
15.07.2021 16:12
Задание 2 сор по информатике Оператор выбора. Составить программу, которая спрашивает у детей возраст и распределяет их по группам в детском садике. Если ребёнку 1-2 года,...
volodya13031
16.11.2022 11:57
Ввести целые числа в переменные а,б,с.нечетные значения уменьшить на единицу...
MaМальчик
21.05.2022 22:33
Паскаль Дан целочисленный массив из 10 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на одном из языков программирования алгоритм, позволяющий...
Chchcjcujcj
15.09.2021 05:43
Паскаль заполнить массив случайными числами и найти элемент наиболее близкий по значению к максимальному элементу....
Smertnik9595
15.09.2021 05:43
Отметь неопределенное высказывание: а) погода хорошая б) все двери сделаны из дерева в) 40+10=50...
milenluiz
15.09.2021 05:43
Какие каналы связи используются для передачи данных в компьютерных сетях?...
Ответ:
тони2006
08.10.2020 03:37
Var count, i: integer;
begin
count := 0;
for i := 10 to 99 do
if i mod 10 = 7 then
count := count + 1;
writeln(count);
end.
0,0
(0 оценок)
Ответ:
snegovayasnejaovrg7j
08.10.2020 03:37
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
Range(17,99,10).Count.Println
end.
Результат
9
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота