Вопрос по информатике:
Определить максимальное трёхзначное целое
число, которое нацело делится на 21.
Вывести значения: делимое число, остаток от деления на 21 и целое
частное для каждого шага алгоритма.
Отдельной строкой вывести ответ.
написать прогу в паскале
- 11.08.2017 22:35
- Информатика
- remove_red_eye 16541
- thumb_up 19
Ответы и объяснения 1
Program X;
var
max, i: longint;
begin
max:=0;
for i := 100 to 999 do
begin
writeln('Делимое: ', i , ' Остаток: ' , i mod 21, ' Целое частное: ' , i div 21 );
if (i mod 21) = 0 then max := i
end;
writeln('Ответ: ', max)
end.
- 12.08.2017 10:38
- thumb_up 39
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.