Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 21.03.2015 03:22
- Информатика
- remove_red_eye 12704
- thumb_up 32
Ответы и объяснения 2
Внимание! Если программа не работает, обновите версию!
begin
var a,b,c:integer;
Read(a,b,c);
while ab do
if a>b then a:=a-b
else b:=b-a;
while ac do
if a>c then a:=a-c
else c:=c-a;
Writeln(a)
end.
Все реализовано в точном соответствии с приведенной блок-схемой.
Проверено для набора входных данных 6 30 15, получен верный результат 3.
- 23.03.2015 19:05
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.