tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу в
Написать программу в паскаль.из всех двузначных чисел вывести на экран те из них, сумма цифр которых равна а. (а вводится с клавиатуры)
ilviragaraeva2
3 23.06.2019 17:20
2
Ответы
зарема89
19.07.2020 13:58
Var
a,i:integer;
begin
write('A=');
readln(a);
for i:=10 to 99 do
if (i div 10)+(i mod 10) = a then
writeln(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ololol1213
20.10.2020 03:37
Какой из предложенных тегов предназначен для определения видимой часть документа?...
anitamirzikkk
20.10.2020 03:37
Установите соответствие. 1) Процессор 2) Жесткий диск A) Запоминающее устройство для длительного хранения данных.B) Устройство для временного хранения данных.C) Главная часть...
hjccbyfoyf6ui
20.04.2020 17:25
Решите полностью работу ,в информатике не понимаю ничего...
Котик0303
20.04.2020 17:25
Какова важность блоков в среде...
ваноумно
20.04.2020 17:24
Пользователь работал с файлом D:\Мультфильмы\Гравити_Фолз\Диппер.jpg Сначала он поднялся на один уровень вверх, затем ещё раз поднялся на один уровень вверх, создал подкаталог...
МарсСМарса
29.10.2020 08:36
Файлдык структура кандай болуп бөлүнөт...
Happyunicorn28
04.03.2021 12:01
Совокупность всех программ, предназначенных для организации диалога с пользователем, поддержания функционирования компьютера и управления его устройствами. A. программное содержаниеB....
Ангелмоямама
10.09.2019 10:30
Сообщение на тему антивирусные программы...
Alexbouk
30.12.2021 02:04
Написать блок схему s=x^3+x^5+x^n...
ahmadieva05
30.12.2021 02:05
Тема : Модели и Моделирование...
Популярные вопросы
Выполни действия с величами9см-3мм=?...
3
Сочинение самара космическая для 4 класса...
3
Наибольший и наименьший делитель числа 19735...
2
Решите уравнение. (580: х-25)*90 плюс490...
3
Мне нужно любое сочинение,сказки,стихи,летописи,но главное чтобы главный герой...
2
Запишите в виде суммы разрядных слагаемых...
1
Найти слова близкие по значению дождь жара ливень холод зной стужа...
3
Как правильно написать слово немог или нимог найти...
1
(500-6*х): 40 плюс 16 реши уравнение...
1
Напиши,что сначала привлекло серёжку в электронике. зачем он выдавал электроника...
3
a,i:integer;
begin
write('A=');
readln(a);
for i:=10 to 99 do
if (i div 10)+(i mod 10) = a then
writeln(i);
end.