Вопрос по информатике:
. Выполните на компьютере программу Evklid. Протестируйте ее на значениях М= 32, N = 24; М = 696, N = 234.
Пожаловаться
- 11.07.2018 08:34
- Информатика
- remove_red_eye 7210
- thumb_up 26
Ответы и объяснения 1
Нахождение наибольшего общего делителя, если я правильно понял?
program Evkild;
var
a, b: integer;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
while (a 0) and (b 0) do
if a >= b then
a := a mod b
else
b := b mod a;
writeln('Наибольший общий делитель = ', a + b);
readln;
end.
program Evkild;
var
a, b: integer;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
while (a 0) and (b 0) do
if a >= b then
a := a mod b
else
b := b mod a;
writeln('Наибольший общий делитель = ', a + b);
readln;
end.
Пожаловаться
- 12.07.2018 11:32
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы