Если число, введенное с клавиатуры четырехзначное и делится на 5, то вывести слово "УДАЧА", в противном случае "НЕУДАЧА"
5-9 класс
|
var a: Int64;
begin
readln(a);
writeln(((a >= 1000) and (a <= 9999) and (a mod 5 = 0)) ? 'Удача' : 'Неудача');
end.
Другие вопросы из категории
, если алфавит, используемый племенем Пульти, содержит 33 символа?
Напишите пожалуйста так: Дано:... Решение:
mod(160div(400 mod 150))=
помогите решить пожалуйста
только с решением пожалуйста)
задачу, подробнее.
n-число пи
на Паскале
Читайте также
составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0.
3. Дана программа на языке Паскаль.
var a,n,s: integer;
begin
s:=0;
n:=0;
repeat;
write('Введите число ');
readln(a);
s:=s+a;
n:=n+1;
until s>100;
writeln('Количество введенных чисел = ' ,n);
end.
Переписать программу используя цикл While.
4. Вывести на экран массив целых чисел, Состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20,60].
ести максимальное значение среди трехзначных элементов массива, делящихся на 4. Если в исходном массиве нет трехзначного элемента, который делится на 4, то вывести сообщение о том, что такого числа нет.
х+1,если х<=0
2 задача - вычислить Y в зависимости от x,введенного с клавиатуры (12,5*2,если -1<=х<0
х-1,если х<-1
12х,если х>0
трехзначное и делится либо на 7, либо на 11, то его разделить на цело на 11. В остальных случаях разделить число на 10. ( сделать с помощью программы Pascal) Заранее огромное спасибо))))
6.Программа должна вывести одно число:сумму чисел,введенных с клавиатуры, кратных 4 и оканчивающихся на 6.