Вопрос по информатике:
Блок схему пж
program pr1;
var a,b,c:byte;
begin
writeln('Введите a,b,c');
readln(a,b,c);
if a>b then begin a:=a+b; b:=a-b; a:=a-b;end;
if b>c then begin b:=b+c; c:=b-c; b:=b-c;end;
if a>b then begin a:=a+b; b:=a-b; a:=a-b;end;
writeln('a=',a,' b=',b,' c=',c);
end.
- 01.04.2018 08:26
- Информатика
- remove_red_eye 10201
- thumb_up 39
Ответы и объяснения 1
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.