сервис вопросов и ответовЗаполнить массив случайными числами из промежутка (1-100) и определить в массиве P[1..20]кол-во однозначных чисел
10-11 класс|
|
Kira109
24 сент. 2014 г., 3:12:37 (9 лет назад)
Olgakets62
24 сент. 2014 г., 5:56:11 (9 лет назад)
var p:array [1..20] of integer;
i,k:integer;
begin
randomize;
for i:=1 to 20 do begin
p[i]:=random(100)+1; write(p[i],' '); end;
writeln;
k:=0;
for i:=1 to 20 do
if p[i] div 10=0 then k:=k+1;
writeln('Количество однозначных чисел в массиве = ', k);
end.
Ответить
Другие вопросы из категории
Для какого из значений числа Y высказывание
(Y < 5) & ((Y > 1) -> (Y > 5)) будет истинным?
В чём заключается поиск элемента в массиве методом Бора и хеширования?
Уже весь интернет облазил, даже намёка нет.
помогите пожалуйста! составить линейную программу, паскаль
первую или вторую задачу
вторая: троллейбус за время t прошёл пусть s
какую скорость v приобрёл он в конце пути и с каким ускорением a двигался, если начальная скорость движения равна .v0.(77)
Читайте также
проверьте пожалуйста программу!!!
1. Заполнить массив случайные числами из промежутка [10;20]
2. Найти максимальный и минимальный элементы в этом массиве
3. Обменять первый максимальный и последний минимальный
проверьте пожалуйста программу!!!
1. Заполнить массив случайные числами из промежутка [10;20]
2. Найти максимальный и минимальный элементы в этом массиве
3. Обменять первый максимальный и последний минимальный
Вы находитесь на странице вопроса "Заполнить массив случайными числами из промежутка (1-100) и определить в массиве P[1..20]кол-во однозначных чисел", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.