Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

определите является ли число полным кратным 5

10-11 класс

1706200412345 03 дек. 2016 г., 13:41:20 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Nata80082
03 дек. 2016 г., 14:42:13 (7 лет назад)

var

  a:real;

begin

  write('Введите число '); readln(a);

  if (frac(a) = 0) and( trunc(a) mod 5 = 0) then

    writeln('Число ', a ,' кратно 5')

  else

    writeln('Число ', a ,' некратно 5')

end.

 

Ответить

Другие вопросы из категории

Помогите, пожалуйста! Нужно сдать завтра.

Задания (циклы) на паскале
1.

В старояпонском календаре был принят двенадцатилетний цикл. Годы внутри цикла носили названия животных: крысы, коровы, тигра, зайца, дракона, змеи,

лошади, овцы, обезьяны, петуха, собаки и свиньи. Написать программу, которая позволяет ввести номер года и печататет его название по старояпонскому календарю. Справка: 1996 г. - год крысы - начало очередного цикла (остаток от деления равен 4). Help!

Объясните, сколько компьютерных терминов спрятано в тексте Мы простые и несовременные люди. С "Плейбоями" и "красотками" не имеем ничего общего.

Лично я книголюб, Айтматова и Аставфьева читающий и почитающий. Ведь до сих пор талантом их никто не превзошел. За минувшие годы перемен произошло видимо-невидимо. Демократия,как говорят, на дворе. Давно уже нет организаций типа МОПР, интернациональные проблемы расстмариваются в ООН и в Совете Европы. Рабочий класс нынче же не гегемон,и торжеств в его честь уже не бывает. Трудовые копейки мы шкатулочке и сбербанку не доверяем, хотя бы потому, что и доверять-то нечего. Любимые мелодии записываются теперь не на виниловом, а на лазерном диске: та же музыка,а звук иначе.

Читайте также

4 задачи: ввести натуральное число и определить, верно ли, что сумма цифр равна 10 (через repeat и until)//// ввести натуральное

число и определить, какие цифры встречаются несколько раз (через repeat и until)///

ввести целое число и найти сумму его цифр (через while)

ввести целое число и определить , верно ли, что в его записи есть две одинаковые цифры(через while)

всё через паскаль абс

Помогите пожалуйста с 2 задачами! 1) Простым числом называется натуральное число p>1, натуральными делителями которого которого являются

только два числа: 1 и P. Определить, является ли введенное с клавиатуры число простым.

2) Дано число n. Верно ли, что это число содержит ровно 3 одинаковых цифры?

Из 16-ти чисел, спросите у пользователя ,сколько нужно проанализировать чисел, а затем запросите эти числа и сделайте для каждого вывод, является ли

оно четным или отрицательным.(Паскаль)

Или так: Из 16 -ти чисел,сделайте для каждого вывод,является ли оно четным или отрицательным .(Паскаль)

Помогите пожалуйста,оченьььь срочно надо!Буду благодарна за решение ,спасибо!!!!!!!



Вы находитесь на странице вопроса "определите является ли число полным кратным 5", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.