Регистрация
timurtim1
01.12.2022 05:25
Информатика
Есть ответ 👍

Склавиатуры вводится массив из 15 элементов, состоящий из целых чисел. сформировать новый массив, состоящий из элементов больше 10. паскаль надо

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

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

nogtev70
nogtev70
4,5(94 оценок)
// pascalabc.net 3.2, сборка 1399 от 08.03.2017 // внимание! если программа не работает, обновите версию! begin   var a: =readarrinteger(15);   var b: =a.where(x-> x> 10).toarray; b.println end.
VasyaKotikSnake
VasyaKotikSnake
4,8(18 оценок)

var

  x, y: integer;

  v: integer; // переменная

begin

  write('введите x,y: ');

  readln(x, y);

  v : = x;

  x : = y;

  y : = v;

  writeln('новые значения x,y: ', x, ' ', y)

end.

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