составьте программу ввода массива s [1..8] с клавиатуры и вывода элементов

Составьте программку ввода массива s [1..8] с клавиатуры и вывода частей больше 5.

Задать свой вопрос
Антонина Заксенберг
Паскаль?
Алла Секач
да
1 ответ

var a : array [1..8] of byte;
begin  for var i := 1 to 8 do begin
    write(i, ':'); readln(a[i]);
  end;
  for var i := 1 to 8 do
    if a[i] gt; 5 then writeln(a[i]);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт