Предмет: Информатика,
автор: HappyWolf
Заполнить массив А первыми Н натуральными числами, начиная сХ(ввести Х с клавиатуры)
Ответы
Автор ответа:
0
type mas=array[1..1000] of integer;
var
a:mas;
i,h,x,k:integer;
begin
readln(h,x);
k:=0;
for i:=x to h+x do
begin
read(i);
k:=k+1;
a[k]:=i;
end;
for i:=1 to k do
write(a[i], ' ');
end.
На всякий случай написала вывод массива
var
a:mas;
i,h,x,k:integer;
begin
readln(h,x);
k:=0;
for i:=x to h+x do
begin
read(i);
k:=k+1;
a[k]:=i;
end;
for i:=1 to k do
write(a[i], ' ');
end.
На всякий случай написала вывод массива
Автор ответа:
0
Точно-точно.. Не дурак же.. Ну, не совсем ещё.. )
Автор ответа:
0
Информатика - это круто) Разбирайся в ней) А сейчас, вообще, профессия программиста востребована
Автор ответа:
0
А я вот и решил на программиста пойти.. Разбираюсь потихоньку
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: ramanfloki61
Предмет: Обществознание,
автор: aborodin
Предмет: Алгебра,
автор: RuslanaSklyarenko
Предмет: Алгебра,
автор: Gtyklesa