Введите массив из 5 элементов с клавиатуры. введите число x и найдите все значения, равные квадрату x. pascal abc

216

308

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

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

bek34

Информатика

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

1." введите массив из 5 элементов с клавиатуры. " program n_1; const n=5 var a: array[1..n] of integer; i,k: integer; begin for i: =1 to n do begin readln (k); a[i]: =k; end; writeln; for i: =1 to n do write (a[i]); readln; end.