Информатика | 5 - 9 классы
МНОГО БАЛЛОВ.
Написать на языке Паскаль данную задачу.
Желательно, с пояснениями.
Дано целое 3 - хзначное число.
Определить, является ли сумма его цифр четной.
Дано натуральное число?
Дано натуральное число.
Определить каких цифр в данном числе больше четных или нечетных.
Через Паскаль.
Дано трехзначное число?
Дано трехзначное число.
Найти сумму цифр числа.
(Написать программу на языке Паскаль).
1. Дано двузначное число?
1. Дано двузначное число.
Найти разность и частное его цифр.
2. Дано целое число.
Если оно является положительным то прибавить к нему 1.
Емли нулевым то заменить его на 10.
3. Дано двузначное число.
Вывести его левую цифру, потом правую.
4. Дано целое число, определить является ли оно четным.
5. даны два целых числа.
Найти сумму всех целых чисел от а до в.
Написать программы (паскаль).
Дано 2х значное число определить является ли сумма цифр четной?
Дано 2х значное число определить является ли сумма цифр четной.
В данном целом числе N, заменить нулями все четные цифры в данном числе?
В данном целом числе N, заменить нулями все четные цифры в данном числе.
Вывести полученное число.
(Паскаль).
Даны два целых числа а, в определить являются ли они четными?
Даны два целых числа а, в определить являются ли они четными.
Написать программу на языке паскаль Определить является ли число четным или нечетным?
Написать программу на языке паскаль Определить является ли число четным или нечетным.
Дано натуральное число ?
Дано натуральное число .
Определить есть ли в нем цифра а Написать с постусловием язык Паскаля !
Дано целое четырехзначное число?
Дано целое четырехзначное число.
Если число четное, найти произведение его цифр, иначе перевернуть число, записав его цифры в обратном порядке.
Написать программу в Паскале.
Задача по информатике?
Задача по информатике.
Найти сумму цифр данного целого числа.
Программа.
Паскаль.
Вопрос МНОГО БАЛЛОВ?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 5 - 9 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.
Var a, s : integer ;
begin
repeat
write('vvedite triohznacinoe cislo : ') ;
readln(a) ;
until(a> ; 99)and(a< ; 1000) ;
s : = a div 100 + a div 10 mod 10 + a mod 10 ;
if s mod 2 = 0 then
writeln('summa zifr ciotnaia')
else
writeln('summa zifr neciotnaia') ;
readln ;
end.