Задание 2. Разберите, наберите и выполните программу.
var
var u:var[1..7] of integer;
i:integer;
begin
for i:=1 to 7 do read(u[i]);
for i:=1 to 7 do write(u[i],’ ‘);
end.
Задание 3. Составьте программу ввода с клавиатуры 6 вещественных чисел и вывода на экран со 2 по 5 элемент массива.
Задание 4. Упр. 4. стр. 32. Как получить случайные целые числа от -5 до 5 смотри в учебнике стр. 30.
Задание 5. Упр. 5. стр. 32. Как получить случайные числа смотри в учебнике стр. 29-30.
var
var u:var[1..7] of integer;
i:integer;
begin
for i:=1 to 7 do read(u[i]);
for i:=1 to 7 do write(u[i],’ ‘);
end.
Задание 3. Составьте программу ввода с клавиатуры 6 вещественных чисел и вывода на экран со 2 по 5 элемент массива.
Задание 4. Упр. 4. стр. 32. Как получить случайные целые числа от -5 до 5 смотри в учебнике стр. 30.
Задание 5. Упр. 5. стр. 32. Как получить случайные числа смотри в учебнике стр. 29-30.
Надо var u:array[1..7] of integer;
ОтветитьУдалитьСпасибо
Удалить