tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Определить что, данное натуральное
Определить что, данное натуральное число а кратно числу ь, но не кратно числу с! составить программу.
Katellil3
1 20.06.2019 13:30
2
Ответы
BN6573
16.07.2020 13:18
Var a, b, c:integer;
begin
write('Введите a, b, c: '); readln(a, b, c);
if(a mod b = 0) and (a mod c <> 0) then writeln('Кратно b, но не кратно c')
else writeln('Условие не истинно');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kristiplay
27.05.2019 05:30
Вопрос по базам данных с вариантами ответа добрый вечер, школьники, студенты, а также более старшие представители ( хотелось бы прочитать мнение студентов-программистов,...
kmvkemerovo
23.11.2021 21:52
Как называется этот инструмент?...
Помогите23441
23.03.2020 02:13
Допустим, в стране N действуют следующие правила дорожного движения: Детям до 7 лет можно ездить в машине только в специальных креслах; Детям в возрасте от 7 до 12 лет можно...
Милая8
29.08.2019 14:10
Внекотором каталоге хранился файл сирень.doc. в этом каталоге создали подкаталог июнь и файл сирень.doc переместили в созданный подкаталог. полное имя файла стало...
oksiz72
01.08.2019 21:20
13(y-0,7)-1,2(y+10)=50y-97,5 решите уравнение...
romashka412
01.08.2019 21:20
17\18-[x-3]=10\18 cпасибо всем зарание...
VADIMECHE
01.08.2019 21:20
Какова роль биологических знаний в современном обществе?...
Асия2008
01.08.2019 21:20
Продолжить предложение и дописать 2-3 своих) если взять одну бусинку, то её можно зажать в кулаке, можно положить на ладошку и рассматривать, но вот надеть для украшения...
PUPOK2101
01.08.2019 21:20
Скласти програму обчислювання функции ; s=sin^3t + cosz^3 ln/x/ / e^-у при t = 0.7 z= -1.9 y1= -7.2 y2= 1.5 y3= 4.1 x1= 6,3 x2= -10 x3= -3...
Zxcvbnm900
01.08.2019 21:20
Уровнить: koh➡ zn(oh)2➡ k2zno2➡ znso4...
Популярные вопросы
4(-3,5+3х)=-3+10х решить уравнение...
1
Сколько по массе хлорида алюминия образуется при взаимодействии 6,48г...
2
Контрольний твір-опис процесу праці за власними в художньому стилі...
1
Пож про скрещивание 1. при скрещивании серых мышей с белыми в первом...
1
Вкаком городе россия была открыта первая зарание...
2
За 4 год майстриня пришила 64 гудзики.скільки гудзиків вона пришиє за...
2
Основные виды деятельности человека в мировом океане 4 примера...
2
Натрия и калия массой 8,5 г растворили в воде и получили 3,36л (н.у)....
2
Какая часть речи у слова впоследствии...
1
Жильцы из 2 соседних домов решив встретятся отправились одновременно...
3
begin
write('Введите a, b, c: '); readln(a, b, c);
if(a mod b = 0) and (a mod c <> 0) then writeln('Кратно b, но не кратно c')
else writeln('Условие не истинно');
end.