tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Склавиатуры вводятся последовательность
Склавиатуры вводятся последовательность из n целых чисел сколько чисел кратных числу p
Вета2008
1 05.06.2019 18:20
0
Ответы
vika2087
01.10.2020 19:54
Var n,p,k,s,i:integer;
begin
writeln(n);
readln(n);
writeln(p);
readln(p);
s:=0;
for i:=1 to n do
begin
writeln('введи число');
readln(k);
if (k mod p =0) then s:=s+1;
end;
writeln('ответ ',s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
AsdZaKAsd
25.08.2019 14:50
Нужно составить алгоритм для любой игры ( для четвероклассника)...
belovworms2003p0af24
25.06.2019 23:50
Найти ошибки и исправить,и заполнить пропуски вычислить сумму цифр заданного k -значного числа var k : 1..4; n: double; begin writeln( введите количество цифр k: ); readln(k); writeln(...
Silvertrue
12.05.2020 09:32
Сделайте у меня СоР по этой теме...
Vollver
10.06.2019 06:30
1. ип имеет в своем распоряжении три компьютера для переноса базы данных между компьютерами применяется флеш диск какой называется такая схема работы 2. в организации применяется...
массисо
10.06.2019 06:30
ответьте на вопросы : из каких источников вы получаете информацию? какие свойства информации вы знаете? какие формы представления информации вы знаете? представьте информацию о...
School13kursk
14.12.2020 10:46
– это процесс создания и использования моделей при решении задач в различных отраслях науки и техники....
dksusjehdh
14.12.2020 10:46
BCОA А2DДано: AO = D0, 21 = 22.Доказать: ДАОВ = ADOC....
ms71431
14.12.2020 10:45
1)с какими методами поиска информации электронной таблице Exel вы познакомились? 2)каковы функции команды найти и выделить 3)что такое заменяемый символ? для чего он используется?4)каковы...
katyakantalins
20.09.2021 10:04
ДОМАШНЕЕ ЗАДАНИЕ 1. Составьте таблицы истинности для следующих логических суждений. 1. B& (A V B); 2. A& (AvВvc); 3. ПА & Bv1С; 4. (A V B) & А; 5. В(1 CvD)&A;...
FreddyGa
20.09.2021 10:10
Что такое граф, вершина, дуги, рёбра?Простыми словами...
Популярные вопросы
Разберите данное ниже слово по составу. ёлки...
3
Представте дробь 4/11 в виде переодической десятичной дроби....
2
Сходства западно тюркского и тюргешского и различия напиши 3 сходства и различия...
2
100 ! 1.чистая вода нужна для питья.в воде, загрязненной с точными фабрик,заводов...
3
Брату х лет, а его сестре на а лет моложе. при любых ли значениях х и а имеет...
1
Через 20 минут в школу за 2 книги заплатили 180 руб 1 книга дешевле в 3 раза...
2
F(x)=1/3 sin x/2+1/2cosx/2 найдите f(x)...
1
Над каждым словом из данного предложения напишите, какой частью речи оно является....
3
От данных слов образуйте прилагательные или причастия с суффиксом енн-ённ. сначала...
2
Переведите числа 200(10) 2016(10) в 2ю,8ю,16ю систему счисления...
3
begin
writeln(n);
readln(n);
writeln(p);
readln(p);
s:=0;
for i:=1 to n do
begin
writeln('введи число');
readln(k);
if (k mod p =0) then s:=s+1;
end;
writeln('ответ ',s);
end.