сервис вопросов и ответовввести строку найти и вывести количество цифр больших 5 входящую в данную строку Срочно на языке паскаль
5-9 класс|
|
America59
15 дек. 2016 г., 16:40:55 (7 лет назад)
Zineldil
15 дек. 2016 г., 17:35:54 (7 лет назад)
Если я тебя правильно поняла, то держи:)
var i, kol: integer;
a: array[1..10] of integer;
begin
for i:=1 to 10 do readln(a[i]);
kol:=0;
for i:=1 to 10 do
if a[i]>5 then kol:=kol+1;
writeln(' ', kol);
end.
Ответить
Другие вопросы из категории
В некотором каталоге хранится файл Шпора.tхt. В этом каталоге создали подкаталог
и переместили в него файл Шпора.tхt. После этого полное имя файла стало
D:\Документы\Химия\Контрольная\Шпора.txt
Каково полное имя каталога, в котором хранился файл до перемещения?
Читайте также
2. Определить, делится ли введенное число "а" на 3. Если делится то вывести на экран "Число делится на 3".Тип переменной определить самостоятельно. При
составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0.
3. Дана программа на языке Паскаль.
var a,n,s: integer;
begin
s:=0;
n:=0;
repeat;
write('Введите число ');
readln(a);
s:=s+a;
n:=n+1;
until s>100;
writeln('Количество введенных чисел = ' ,n);
end.
Переписать программу используя цикл While.
4. Вывести на экран массив целых чисел, Состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20,60].
Вы находитесь на странице вопроса "ввести строку найти и вывести количество цифр больших 5 входящую в данную строку Срочно на языке паскаль", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.