Склавиатуры ввести 10 целых чисел и вывести в строчку - вопрос №8438438105 от Makalllla1122 23.03.2022 14:35

Question

Информатика: Склавиатуры ввести 10 целых чисел и вывести в строчку все числа большие 5.

Makalllla1122 · Answer

Program N1;var a: array [1..10] of integer;i:integer;beginfor i:= 1 to 10 doreadln(a[i]);for i:=1 to 10 do beginif a[i] 5 thenwrite (a[i]);end;end....