Program projectwork; begin var a, b, c:integer; begin read (a); read (b); read (c); d:=a+b+c/3; write ('d='); end; end. ожидался

Question

4 года назад

15

Program projectwork; begin var a, b, c:integer; begin read (a); read (b); read (c); d:=a+b+c/3; write ('d='); end; end. ожидался

Program projectwork;
begin
var a, b, c:integer;
begin
read (a);
read (b);
read (c);
d:=a+b+c/3;
write ('d=');
end;
end.

ожидался идентификатор но вар обнаружено

Знания

Информатика

1 ответ:

Алена Кравцова · Answer 1 · 2020-05-21T20:10:14+03:00

Алена Кравцова4 года назад

0 0

Program projectwork;
var a, b, c:integer;
d:real;
begin
read (a);
read (b);
read (c);
d:=a+b+c/3;
write ('d=',d);
<span>end.
P.S.Если эта программа находит среднее арифметическое 3 введённых чисел,то </span>d:=(a+b+c)/3;