Предмет: Информатика,
автор: andreyflyings
Информатика.Паскаль.(10-11 класс)1 курс. Помогите пожалуйста написать программу
по теме : " Разработка и отладка программ с циклами " .
+ Если по этой программе можно сделать график , то сделайте пожалуйста хотя бы примерный.
Приложения:

andreyflyings:
Вычислить все значения и найти среднее арифметическое Y, где Y=A+x^2 где A любое число, x [0,5;4,5] с шагом=0.3.
Ответы
Автор ответа:
1
var Y,a,x:real;
c:Integer;
begin
read(a);
x:=0.5;
while x<=4.5 do begin
Y:=a+sqr(x);
writeln('x:',x:2:2,' Y:',Y:2:2);
c:=c+1;
x:=x+0.3;
end;
write('Среднее арифмитическое:',Y/c:2:2);
end.
я думаю что эт правильно
c:Integer;
begin
read(a);
x:=0.5;
while x<=4.5 do begin
Y:=a+sqr(x);
writeln('x:',x:2:2,' Y:',Y:2:2);
c:=c+1;
x:=x+0.3;
end;
write('Среднее арифмитическое:',Y/c:2:2);
end.
я думаю что эт правильно
Похожие вопросы
Предмет: История,
автор: zn690612
Предмет: Русский язык,
автор: agapovalerika
Предмет: Информатика,
автор: styles23
Предмет: Литература,
автор: Instagram100
Предмет: Математика,
автор: ученик2552