Предмет: Информатика,
автор: nurr322
Сделать программу на паскале
17. Заполнить линейный массив по формуле : n[ i]=12x-i/7x+1.
Ответы
Автор ответа:
0
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:= new real[20]; var x:=readinteger('x=');
for var i:=1 to 20-1 do
mas[i]:=12*x-i/7*x+1;
mas.Select(t->round(t*100)/100).Println;;
end.
//Внимание! Если программа не работает, обновите версию!
begin
var mas:= new real[20]; var x:=readinteger('x=');
for var i:=1 to 20-1 do
mas[i]:=12*x-i/7*x+1;
mas.Select(t->round(t*100)/100).Println;;
end.
Автор ответа:
0
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var a:= new real[15];
write('x=');
var x:=ReadReal();
a.Fill(i->12*x-i/7*x+1);
a.Println();
end.
//Версия 3.3, сборка 1611
begin
var a:= new real[15];
write('x=');
var x:=ReadReal();
a.Fill(i->12*x-i/7*x+1);
a.Println();
end.
Похожие вопросы
Предмет: История,
автор: itsvelly
Предмет: Математика,
автор: tetanaskiba665
Предмет: Математика,
автор: syrovazlata123
Предмет: Алгебра,
автор: katiaspivak
Предмет: Математика,
автор: Лалкаррсол