Паскаль , написала я программу по -ввести три числа, найти их сумму, произведение и среднее арифметическое пример введите три числа 4 5 7 4+5+7=16 4×5×7=140 (4+5+7)÷3=5.333333 получилось вот что, выдает ошибку, в чём сос program circle_8; var a,b,c,sum,p,sr: real; begin writeln ('введите a,b,c'); read (a,b,c); sum: =a+b+c; p: =a*b*c; sr: =(a+b+c)/3; writeln(sum); (a,'+',b,'+',c,'=',sum); writeln(p); (a,'*',b,'*',c,'=',p); writeln(sr); (a,'+',b,'+',c,'/',3,'=',sr); end.

nikim05 nikim05    1   03.10.2019 07:40    8

Ответы
юсуф37 юсуф37  11.08.2020 11:52

Вот верный код

Program circle_8;

var a,b,c,sum,p,sr: real;

Begin

writeln ('Введите a,b,c');

read (a,b,c);

sum:=a+b+c;

p:=a*b*c;

sr:=(a+b+c)/3;

Writeln ('Сумма: ',sum);

Writeln ('Произведение: ',p);

Writeln ('Среднее арифметическое: ',sr);

End.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика