Вопрос по информатике:
ДАЮ 34 БАЛЛА!!!!
Помогите решить задания по информатике (задание нужно решать через паскаль+ блок схема)
Составить в тетради блок-схемы и программы для следующих алгоритмов:
А) определения делимости числа на 7;
Б) определения делимости числа на 3 и 6;
В) определения делимости числа на 3 и 5;
- 05.03.2018 06:16
- Информатика
- remove_red_eye 1950
- thumb_up 14
Ответы и объяснения 1
var n : integer;
begin
readln (n);
if n mod 7 = 0 then write ('Кратно семи')
else write ('Не кратно семи');
end.
Б)
var n : integer;
begin
readln (n);
if (n mod 6 = 0) and (n mod 3 = 0) then write ('Кратно шести и трём')
else write ('Не кратно шести и трём');
end.
В)
var n : integer;
begin
readln (n);
if (n mod 5 = 0) and (n mod 3 = 0) then write ('Кратно пяти и трём')
else write ('Не кратно пяти и трём');
end.
- 06.03.2018 17:04
- thumb_up 23
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.