Регистрация
oksankalahutina5
04.08.2022 19:13
Информатика
Есть ответ 👍

СДЕЛАЙТЕ В ВОРДЕ 1 ЗАДАНИЕ И ПРИШЛИТЕ МНЕ!

154
331
Посмотреть ответы 1

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

cimuzoro
cimuzoro
4,5(23 оценок)

var

a: array [1..15] of integer;

i: byte;

begin

a[1]: =1;

writeln (a[1]);  

for i: =2 to 15 do begin

a[i]: =a[i-1]+2;

writeln (a[i]);

end;

readln;

end.

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