составьте программу заполнения массива а[1..10] нечетными числами:
5-9 класс
|
индексы элемента 1 2 3 4 5 6 7 8 9 10
значение элемента 1 3 5 7 9 11 13 15 17 19
program mas;
var a:array[1..10] of integer;
i,p:integer;
begin
p:=1;
for i:=1 to 10 do
begin
a[i]:=p;
p:=p+2;
end;
end.
var a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do begin
a[i]:=2*i-1;
write(a[i]:3);
end;
end.
Другие вопросы из категории
Условие:
По 3 введеным сторонам треугольника определить является ли треугольник прямоугольным.
страниц содержал переданный текст если известно что информационный вес одного символа равен 8 битам а на одной странице 48 символов
ОТВЕТ ПОЛНЫЙ плиз
Читайте также
значение элемента 1 6 3 12 5 18 7 24 9 30
закономерность- значения элементов с нечетными индексами равны индексу элемента,а значения элементов с четными индексами-утроенному индексу элемента
нужно он var то end.
индекс элемента 1 2 3 4 5 6 7 8 9 10
значение элемента 3 6 9 12 15 18 21 24 27 30
2. Составьте программу заполнения массива A(20) датчиком случайных чисел в диапазоне от -50 до 49 включительно.
3*. Составьте программу заполнения массива, не используя клавиатуру, числами: 1, 3, 5, 7, 9, 11, 13, 15, 17, 19.
кратных числу 3.
2) составьте программу , которая заполняет массив а[1..10 ] случайными целыми числами в диапозоне от 1 до 100 и выводит на экран среднее арифмитическое элементов массива
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.