Ответы на вопрос:
program raf105;
var c: array[1..999] of real;
i,x,n: integer;
begin
write('введите количество элементов массива: ');
readln(n);
write('введите значение x: ');
readln(x);
writeln('элементы массива: ');
for i: =1 to n do
begin
c[i]: = 6*x-i/7-6;
writeln(c[i]);
end;
end.
язык программирования pascalabc
Популярно: Информатика
-
Софийкф13.10.2020 11:37
-
Нафаня1337133722.02.2020 16:20
-
Eennoottt05.07.2020 12:20
-
mashasandalkina04.10.2021 10:51
-
aliko70517.11.2020 19:35
-
timon790130.05.2020 16:41
-
oksana141007.04.2023 05:44
-
leontievasv05.04.2020 19:10
-
geraveselov2016.06.2020 17:19
-
zhenyadobr22.09.2022 13:49