Информатика | 5 - 9 классы
1. Дано натуральное число.
Определить :
а) является ли оно чётным
б) оканчивается ли оно цифрой 7.
Дано двухзначное число.
Определить :
а) кратна ли трём его сумма цифр
б) кратна ли сумма его чисел числу а.
ПОМОГИТЕ РЕБЯТАААА!
ООЙЙ КАК СРОЧНО НАДОО.
Дано трехзначное число составить программу которая определят кратно ли 3 произведение его цифр ( на языке паскаль)?
Дано трехзначное число составить программу которая определят кратно ли 3 произведение его цифр ( на языке паскаль).
Дано трехзначное число?
Дано трехзначное число.
Составьте программу которая определяет а)кратна ли 5 сумма его первой и последней цифры
б) сумма квадратов чисел в диапазоне от 1 до n
в) количество натуральных чисел не превышающих 50 и кратных 3.
Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 3 и оканчивающихся на 8?
Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 3 и оканчивающихся на 8.
Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчи - вается числом 0 (0 — признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 100.
Введённые числа не превышают 300.
Программа должна вывести одно число : сумму всех чисел, кратных 3 и оканчивающихся на 8.
Пример работы программы : Входные данные Выходные данные 23 48 12 18 34 0 66.
Дано трехзначное число?
Дано трехзначное число.
Определить, является ли сумма его цифр кратна 3 и 5.
Написать программу на C + + и Pascal.
Вася подсчитал сумму цифр натурального числа N , а затем сумму цифр у полученной суммы цифр?
Вася подсчитал сумму цифр натурального числа N , а затем сумму цифр у полученной суммы цифр.
Какое число он получил?
Входные данные
Вводится одно натуральное число N , меньшее 10 000 .
Выходные данные
Выведите одно натуральное число — ответ в задаче.
НУЖНО СДЕЛАТЬ НА PASCAL ABC.
Дано 4 значное число?
Дано 4 значное число.
Определить является ли сумма его цифр четным числом?
Дано 4 значное число?
Дано 4 значное число.
Определить , является ли сумма его цифр четным?
Даны натуральные числа m и n?
Даны натуральные числа m и n.
Получить все натуральные числа, меньшие n, квадрат суммы цифр которых равен m.
Написать программу о нахождении двухзначного числа А?
Написать программу о нахождении двухзначного числа А.
Найти сумму и произведение цифр данного числа, а также вывести новое число, в котором цифры числа А поменялись местами.
35 балов?
35 балов!
Помогите пожалуйста с информатикой, решить задачи в бейсике.
1)дано целое число, определить оканчивается ли оно чётной цифрой.
2) проверить.
Принадлежит ли число , введённое с клавиатуры.
Интервалу ( - 5, 3).
3) дано двузначное число.
Определить является ли его сумма цифр двузначным числом.
4) дано двузначное число, определить больше ли числа А сумма его цифр.
5) дано двузначное число, определить кратна ли трём сумма его цифр.
6) дано двузначное число.
Определить кратна ли сумма его цифр числу А.
7)дано двузначное число.
Определить водит ли в него цифра 3.
8)дано двузначное число определить какая из его цифр больше : первая или вторая.
9)даны 4 вещественных числа.
Определить сколько из них отрицательных.
На этой странице вы найдете ответ на вопрос 1. Дано натуральное число?. Вопрос соответствует категории Информатика и уровню подготовки учащихся 5 - 9 классов классов. Если ответ полностью не удовлетворяет критериям поиска, ниже можно ознакомиться с вариантами ответов других посетителей страницы или обсудить с ними интересующую тему. Здесь также можно воспользоваться «умным поиском», который покажет аналогичные вопросы в этой категории. Если ни один из предложенных ответов не подходит, попробуйте самостоятельно сформулировать вопрос иначе, нажав кнопку вверху страницы.
1 a)
var a : integer ;
begin readln(a) ; if a mod 2 = 0 then println('da') else println('net') ;
end.
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
1 б)
var a : integer ;
begin readln(a) ; if a mod 10 = 7 then println('da') else println('net') ;
end.
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
2 а
var a : integer ;
begin readln(a) ; if (a div 10 + a mod 10) mod 3 = 0 then println('da') else println('net') ;
end.
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
2 б
var n, a : integer ;
begin writeln('Введите число') ; readln(n) ; writeln('Введите a') ; readln(a) ; if (n div 10 + n mod 10) mod a = 0 then println('da') else println('net') ;
end.