Предмет: Информатика, автор: kotikote875

Сформировать линейную таблицу А(10), каждый элемент которой равен утроенному порядковому номеру


Аноним: Таблицу? На КУМир, что ли?

Ответы

Автор ответа: Аноним
0
var
  a:array[1..10] of integer;
  i:integer;

begin
  for i:=1 to 10 do begin
    a[i]:=3*i;
    Write(a[i],' ')
    end;
  Writeln
end.
Похожие вопросы
Предмет: Математика, автор: Hyny