Вопрос по информатике:
Перевести программы с языка C++ на язык Паскаль:
1.
int a,b;
cin » a»b;
a = 2* a;
if(a >b){a = 2*b;}
else if (a else if(a==b){a = a + b;}
cout « a;
2.
int x = 64;
int y = 40;
while(x!=y){
if(x>y){
x = x - y;
}else{
x = y-x;
}
}
dct
- 22.06.2018 06:23
- Информатика
- remove_red_eye 15958
- thumb_up 26
Ответы и объяснения 1
1. Полноценная программа
var a,b:integer;
begin
Read(a,b);
a:=2*a;
if a >b then a:=2*b
else
if a0 then begin if a=b then a:=a+b end;
Writeln(a)
end.
2. Фрагмент программы
var x,y:intereg;
begin
x:=64; y:=40;
while x=y do
if x>y then x:=x-y else x:=y-x;
- 23.06.2018 01:19
- thumb_up 37
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.