Информатика | 10 - 11 классы
Дано целое число.
Определить является ли оно кратным 3.
(написать программу).
Вот училка задала на отработку по программированию на паскаль ?
Вот училка задала на отработку по программированию на паскаль !
Решите пж : ) " Дано целое число.
Определить, является ли оно кратным 5 и 10 ".
Составить программу для решения задачи : задайте целое число ; определите, кратно ли оно 10?
Составить программу для решения задачи : задайте целое число ; определите, кратно ли оно 10.
1. Дано двузначное число?
1. Дано двузначное число.
Найти разность и частное его цифр.
2. Дано целое число.
Если оно является положительным то прибавить к нему 1.
Емли нулевым то заменить его на 10.
3. Дано двузначное число.
Вывести его левую цифру, потом правую.
4. Дано целое число, определить является ли оно четным.
5. даны два целых числа.
Найти сумму всех целых чисел от а до в.
Написать программы (паскаль).
Дано число?
Дано число.
Определить является ли оно кратным 5, оканчивается ли оно цифрой 7.
Вот училка задала на отработку по программированию на паскаль ?
Вот училка задала на отработку по программированию на паскаль !
Решите пж : ) " Дано целое число.
Определить, является ли оно кратным 5 и 10 ".
Составьте программу, определяющую, является ли данное число кратным 4?
Составьте программу, определяющую, является ли данное число кратным 4.
Дано число?
Дано число.
Определить является ли оно простым.
Программа на паскале.
Напишите через while ИЛИ repeat.
Заранее спасибо).
Дано целое число?
Дано целое число.
Определить кратно ли оно 5.
В паскале дано число, если оно кратно 5, то умножить его на 10?
В паскале дано число, если оно кратно 5, то умножить его на 10.
Написать программу.
2) Дано целое число X?
2) Дано целое число X.
Определить кратно ли оно 2, 3 и целому числу P.
На этой странице сайта, в категории Информатика размещен ответ на вопрос Дано целое число?. По уровню сложности вопрос рассчитан на учащихся 10 - 11 классов. Чтобы получить дополнительную информацию по интересующей теме, воспользуйтесь автоматическим поиском в этой же категории, чтобы ознакомиться с ответами на похожие вопросы. В верхней части страницы расположена кнопка, с помощью которой можно сформулировать новый вопрос, который наиболее полно отвечает критериям поиска. Удобный интерфейс позволяет обсудить интересующую тему с посетителями в комментариях.
Program kratnoe3 ;
var x : integer ;
Begin Writeln('Введите целое число : ') ; readln(x) ; if (x mod 3) = 0 then Writeln('Кратно 3 - м!
')
else Writeln('Не кратно 3 - м') ; end.
Var a : integer ;
begin
writeln ('Введите число') ;
readln (a) ;
if a mod 3 = 0
then
writeln ('число ', a, ' делится на 3')
else
writeln ('число ', a, ' не делится на 3') ;
end.