tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
1.найти количество натуральных
1.найти количество натуральных чисел, не превышающих 100 и кратных 5. 2.создать массив а из 10 элементов, принадлежащих промежутку (0; 25). вывести полученный массив на экран. подсчитать количество элементов, больших а [1]. все с паскаля
aarmen
1 03.06.2019 01:30
1
Ответы
CherryGirll
03.07.2020 15:18
1.
var i,k:integer;
begin
k:=0;
for i:=1 to 100 do
begin
if (i mod 5 = 0) then k:=k+1;
end;
writeln (k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
16nastia16
22.05.2019 02:40
Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 5. программа получает на вход количество чисел в последовательности, а затем...
ra1si1ka1
22.05.2019 02:40
Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 5. программа получает на вход количество чисел в последовательности, а затем...
madara014
24.06.2019 08:40
Информатика 9 ! найти произведение всех целых чисел от 1 до a (значение a вводится с клавиатуры). система pascal...
voronavv2016p08wqy
27.10.2020 16:51
Дано число 1,6993−3. Нормализованная экспоненциальная запись данного числа:...
starpuckstarpuck
04.12.2020 17:43
допустим, вы изменили расширение имени файла music.jpg на wan. Верно ли, что в файле теперь содержится звук?...
QwErTyля
15.09.2019 22:10
Дано натуральное число, определить количество цифр кратных 3-ем и их сумму....
RomisuRomi
15.09.2019 22:10
Вцелочисленной последовательности есть нулевые элементы. создать массив из номеров этих элементов. нужно заполнить массив при команды random...
ksktys
16.04.2021 09:29
1. Діапазон комірок можна перемістити у:а) комірку; б) діапазон комірок; в) рядок формул....
меркульева
25.12.2019 22:36
12a) list all the adjectives in amy s letterwhich describe character. add four more.b) use adjectives to make sentencesabout your family решить...
alena536
25.12.2019 22:36
Вычислите площадь фигур, ограниченных заданными линиями f(x)=-x2-1 , x=1, x=4, ось ox....
Популярные вопросы
Числа a и b удовлетворчют равенству a^2b^2/a^4-2b^4=1. найдите все возможные значения...
3
Постройте предложения, используя глаголы в скобках в present continuous. 1. now...
2
Соотнесите данные примеры налогов: а) прямые, б) косвенные 1.подоходный налог. 2.налог...
2
X-2 1/24=7 5/12 - 4 11/18 решить уравнение...
2
Почему у графика дробно-линейной функции две асимптоты?...
1
Эксперимент осторожно ополосните пустую пластиковую бутылку горячей водой и сразу...
3
Определить объём видеопамяти монитора, если его разрешающая пикселей на 500 пикселей...
1
Как решить уравнение 2,65*(n-3,06)=4,24...
2
Когда мы говорим: «язык», мы думаем: «слова». это естественно: язык состоит из слов,тут...
3
А) запишите число 24 в виде произведения так, чтобы показать, что оно делится на...
1
var i,k:integer;
begin
k:=0;
for i:=1 to 100 do
begin
if (i mod 5 = 0) then k:=k+1;
end;
writeln (k);
end.