Question

составить программу заполнения массива а[1..10] следующими числами:индекс массива 1 2 3 4 5 6 7 8 9 10
значение элемента 1 6 3 12 5 18 7 24 9 30

закономерность- значения элементов с нечетными индексами равны индексу элемента,а значения элементов с четными индексами-утроенному индексу элемента

нужно он var то end.

Answer 1

var
i,n:integer;
f1,f2:text;
begin
assign(f1, 'input.txt');
assign(f2, 'output.txt');
reset(f1);
rewrite(f2);
read (f1,n);
for i:=1 to n do
if (i mod 2) = 1 then write(f2, i, ' ' ) else write (f2, i*3, ' ');  
close(f1);
close(f2);
end.

Answer 2

Ну мало ли) Просто я всегда с файлами работаю)

Answer 3

спасибо вам тоже но тут както мудрено для 9 касса

Answer 4

я не знаю) я в 9 классе) это легкая, просто я не очень внимательный и из-за этого...

Answer 5

ЗАЧЕМ ЧИТАТЬ ФАЙЛ, если потом его значения не используются?

Answer 6

А....девятый класс.... ну ничего, еще есть время научиться писать программы))))