Перевести программы с языка 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

110

389

Посмотреть ответы 2

Ответы на вопрос:

Panikazloy

Информатика

4,5(35 оценок)

1. полноценная программа var a,b: integer; begin read(a,b); a: =2*a; if a > b then a: =2*b else if a< > 0 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;

sirius2010

Информатика

4,8(12 оценок)

var a: array [1..13] of real; i: integer; q,s: real; begin s: =3; a[1]: =3; a[2]: =6; a[3]: =12; a[4]: =24; q: =a[2]/a[1]; for i: =2 to 13 do begin a[i]: =a[i-1]*q; s: =s+a[i]; end; writeln(s); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.