tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти количество двузначных
Найти количество двузначных чисел оканчивающихся на 7. составить программу в pascal.
drad2005
2 20.09.2019 02:10
1
Ответы
xxxxxxxx13
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.
ПОКАЗАТЬ ОТВЕТЫ
Ненике
08.10.2020 03:37
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
Range(17,99,10).Count.Println
end.
Результат
9
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Арина098765
11.08.2019 18:50
Сообщение записано 64-х символьным алфавитом и содержит 90 символов .какой объем информации (в битах) содержит всё сообщение...
Dima98891
06.05.2021 14:00
Сделать таблицу в exel по алгоритму ! Цель: Знакомство с использованием функций табличного процессора MS Excel. 1. Научитесь пользоваться математическими и статистическими...
ULYA1111111
24.07.2019 19:10
Найдите сумму чисел 1 сотни, которая делится на 3. , ....
Серафим6776
15.05.2021 13:42
Объясните назначение инструмента Транспортир (Protractor) в SketchUp, опишите принцип работы )...
Шишиuvuvgyuhuh
15.05.2021 13:37
написать 2 программы на C# 1.с оператором if(10) 2.Даны действительные числа A, B, C. Если сумма чисел A и C. В противном случае каждое заменить произведением двух других...
Quickfast77
15.05.2021 13:32
Информатика Сравните программы n_2 и n_3.Выделите в них общие блоки.Обратите внимание на различия....
XxXKotikXxX
25.01.2021 07:15
Повороты. Урок 2Верных ответов: 234567...
vustiya69
25.01.2021 07:12
1. Как вы понимаете типы данных? 2. Какие виды типов данных существуют? 3. Как обозначается вещественное число числового типа данных?...
elizaveta08071999
25.01.2021 07:12
Что произойдет если использовать инструмент изменить размер не выделяя область?(программаа Paint)...
Milenadaw
04.06.2019 16:40
Запиши сумму чисел 6 и 4.запиши разность чисел 10 и 7.найди их значения 6+4 10-7 это-числовые выражения 1 класс...
Популярные вопросы
номер 5 на какакие группы можно разбить дроби 7/9 4/7 2/7 4/9 5/9 3/7 3/6...
3
СОР ПО РУССКОМУ ДАЮ 1. Добро(помнить), а зло(забывать). 2. Сделав добро,...
3
Алашорда туралы дереккөздерден ақпарат тап.Алаш қайраткерлері туралы сызбаны...
1
Берел корганында табылган жылкыларга неликтен маскалар кигизип берди?...
1
Дать характеристику мельнику Панкрату....
3
До ть будь ласка, контрольна з алгебри ...
1
тапсырма жазылым; қалаған тақырыптарың бойынша эссе жазыңдар. (80-90сөз)...
1
Индустрияландыру қашан, қай съезде қабылданды...
2
Соотнеси блок-схему с синтаксисом условного оператора ДаУсловиеИСТИно?if...
3
Поставь в словах ударение ложки,диван,посуда,забор....
3
begin
count := 0;
for i := 10 to 99 do
if i mod 10 = 7 then
count := count + 1;
writeln(count);
end.
// Внимание! Если программа не работает, обновите версию!
begin
Range(17,99,10).Count.Println
end.
Результат
9