1. Информатика
  2. Напиши те программу в паскале

Напиши те программу в паскале : даны x и y .если x> y то число заменить их квадратами .в противном случае число удвоить . надо

Цнрер Цнрер    2   08.08.2019 20:00    2

Ответы
Maxxxx123 Maxxxx123  04.10.2020 05:50
Var
  a,b:integer;
begin
  readln(a,b);
  if a>b then
  begin
    a*=a;
    b*=b;
  end else
 begin
    a+=a;
    b+=b;
  end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
adil78245 adil78245  18.07.2019 02:10
Какие предположения были сформулированы для модели неограниченного роста?...
lika343 lika343  18.07.2019 02:10
Накануне решали, пойти ли завтра на или в лес по грибы. высказали следующие пожелания: маша: «я пойду в лес, если света и настя пойдут в лес тоже, иначе пойду на ». алексей: «я...
Лаймик0 Лаймик0  25.12.2019 22:06
Составить алгоритм и решение линейного уравнения в блок схемахax+b=cx=c-b/a с информатикой....
саша3347 саша3347  25.12.2019 22:10
4.2.4 вывести квадраты и кубы 10 чисел следующей последовательности: 2, 2, 4, 6, 10, 16, 26 пример: 2 * 2 = 4 2 * 2 * 2 = 8 2 * 2 = 4 2 * 2 * 2 = 8 4 * 4 = 16 4 * 4 * 4 = 64 4.2.5...
Ylija2002 Ylija2002  25.12.2019 22:11
M: =-1k : = 2 × m - 2m: =k + 2k: =k×m+5ответ: 13 или 29? ​...
saya8282 saya8282  25.12.2019 22:20
Дано вещественное число - цена одного кг конфет. вывести стоимость 0,1; 0,2; 0,3; 0,4; 0,5; 0,6; 0,7; 0,8; 0,9; 1 кг конфет. выполнить на python (питон) с цикла for или while...
Sanya339 Sanya339  25.12.2019 22:24
Составить таблицы истинности для следующих логических выражений. f = (а& b) ∨ (a → b) ∨ a...
iro4ka0505 iro4ka0505  25.12.2019 22:26
Надо составить блок схему по имеющейся программе, паскаль, ! ​...
алина3851 алина3851  25.12.2019 22:30
Вчем можно измеряется объем письменного или печатного текста...
алма15 алма15  25.12.2019 20:48
Форматвходныхданных на вход дается два целых числа n, m ( − 10 4 ≤ n, m ≤ 10 4 ) . форматвыходныхданных выведите сначала сумму, а потом произведение чисел, через пробел....

Популярные вопросы