сервис вопросов и ответовНапишите программу, которая считывает с клавиатуры последовательность символов и выводит на экран:
5-9 класс|
|
а)количество считанных десятичных цифр;
б)количество четных цифр;
в)количество нечетных цифр;
Romashina
04 дек. 2013 г., 12:43:14 (10 лет назад)
Tatka2416
04 дек. 2013 г., 14:19:54 (10 лет назад)
var
i,n,x,y,z:integer;
s:string;
begin
readln(s);
for i:=1 to length(s) do
if (47<ord(s[i])) and (ord(s[i])<58) then
begin
n:=StrToInt(s[i]);
case n of 0..9:
begin
x:=x+1;
if n mod 2=0 then y:=y+1 else z:=z+1
end
end
end;
writeln('Число цифр: ',x,'; четных цифр: ',y,'; нечетных цифр: ',z)
end.
Ответить
Другие вопросы из категории
У пятерых друзей было по сестре и каждый женился на какой-то из сестер своих друзей. Назовите фамилию каждого из друзей, имя жены и имя сестры, если:
-сестра Зубова замужем за братом Риты; -брат жены Игоря женат на сестре Карпова; -Сестра мужа Ирины замужем за братом жены Фадеева; -брат жены Мурина женат на сестре Петра; -сестра Михаила замужем за Гуровым, а сестра Дмитрия замужем за Андреем; -брат Елены женат на Анне, а сестра мужа Елены замужем за братом жены брата Зинаиды. с решением
Представьте в виде арифметических выражений следующие утверждения: а) Если к трем прибавить четыре, потом умножить все на четыре и разделить на
разность восьми и шести, то в результате получится четырнадцать.
б) Разность двадцать семи сотых и девяти сотых равна восемнадцати сотым.
Читайте также
1)Напишите программу,которая в последовательности целых чисел определяет количество трехзначных чисел,не кратных 5 и 7 и не заканчивающ
ихся 0 или 1.
Программа получает на вход целые числа от -3000 до 3000.
2)Напишите программу,которая в последовательности целых чисел вычисляет среднее арифметическое среди двухзначных чётных чисел,делящихся на 3.
НУЖНО СЕГОДНЯ! 66 БАЛЛОВ!
Помогите по программе paskal : 1.дано целое число.напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
1. Напишите программу, которая вводит трехзначное число и разбивает
его на цифры. Например, при вводе числа 123 программа должна
вывести 1, 2, 3.
2. Напишите программу, которая вводит возраст человека (число, не
превосходящее 120) и выводит на экран этот возраст со словом «»год,
«года» , «лет» . например «21 год», «22 года», «15 лет»
Помогите пожалуйста !!!!
Составить программу, которая выводит на экран в обратном порядке нечетные числа от 29 до 1 в Pascal ABC.
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.
Вы находитесь на странице вопроса "Напишите программу, которая считывает с клавиатуры последовательность символов и выводит на экран:", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.