Вход
Регистрация
О проекте Как заработать?
97

Найти четные цифры трехзначного числа

terfawer 03 марта 2023

Найти четные цифры трехзначного числа

категория: информатика
ответить
в избранное

80

var d,i: integer; s: string; Begin read (d); s: =str (d); for i: =1 to length (s) do if int (s[i]) mod 2=0 then writeln (s[i]); End.

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
petercash
03 марта 2023
1
ответ
Помогите пожалуйста написать программу по паскалю- дана квадратная матрица A порядка M найти среднее арифметическое элемента каждой ее диагоналипараллельной побочной
vinnie7777
03 марта 2023
1
ответ
С клавиатуры вводится положительное двухзначное число. Найдите произведение исходного числа и числа, записанного теми же цифрами, но в обратномпорядке.
loiol
03 марта 2023
1
ответ
Составьте программу, которая проверяет, делится ли на 3 введенные целое число, и выводит на экран соответствующее сообщение: Делится либо неделится
nimay
03 марта 2023
1
ответ
Составить программу вычеслений значения функции: y={1 при x больше или равно 0; {0 при x<0; однафигурная скобка если что! Составить эту программу в паскале турбо! Пожалуйста
merk_
03 марта 2023
1
ответ
Составить программы решения заданий в Паскале: 1. Определить, является ли целое число N четным двузнычным числом. 2. Подсчитать количествоотрицательных чисел среди чисел а,b, c.
photoart
03 марта 2023
1
ответ
Найти среднее арифметическое всех целых чисел в промежутке от 1 до 100
alex-vrublevsky
03 марта 2023
1
ответ
Какие проекты не базируются на технологиях Веб 2?
viktorich
03 марта 2023
1
ответ
. Составить программу, которая вычисляет число x, округленное до ближайшего целого. Вещественное число x вводится склавиатуры.
kayot
03 марта 2023
1
ответ
Скорость передачи данных через adsl- соединение равна 128000 бит/c. Сколько времени (в секундах) займет передача файла объемом 500 Кбайт по этомуканалу?
Задайте свой вопрос

ПОПУЛЯРНОЕ
petercash, 03 марта 2023
Помогите пожалуйста написать программу по паскалю- дана квадратная матрица A порядка M найти среднее арифметическое…
vinnie7777, 03 марта 2023
С клавиатуры вводится положительное двухзначное число
loiol, 03 марта 2023
Составьте программу, которая проверяет, делится ли на 3 введенные целое число…
nimay, 03 марта 2023
Составить программу вычеслений значения функции: y={1 при x больше или равно 0; {0 при x
merk_, 03 марта 2023
Составить программы решения заданий в Паскале: 1. Определить, является ли целое число N четным двузнычным числом.…
photoart, 03 марта 2023
Найти среднее арифметическое всех целых чисел в промежутке от 1 до 100
alex-vrublevsky, 03 марта 2023
Какие проекты не базируются на технологиях Веб 2?
viktorich, 03 марта 2023
. Составить программу, которая вычисляет число x, округленное до ближайшего целого
kayot, 03 марта 2023
Скорость передачи данных через adsl- соединение равна 128000 бит/c
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...