program Prog;
var a, b, c: Integer;
begin
writeln('Введите три числа:');
read(a); read(b); read(c);
{на 4}
writeln(a,'+',b,'+',c,'=',a+b+c);
writeln(a,'*',b,'*',c,'=',a*b*c);
{на 5}
writeln('(',a,'+',b,'+',c,')/3=',((a+b+c)/3):0:2);
end.
Ответ:
var a, b, c:integer;
read(a, b, c);
writeln(a+b+c);
writeln(a*b*c);
writeln((a+b+c)/3)
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program Prog;
var a, b, c: Integer;
begin
writeln('Введите три числа:');
read(a); read(b); read(c);
{на 4}
writeln(a,'+',b,'+',c,'=',a+b+c);
writeln(a,'*',b,'*',c,'=',a*b*c);
{на 5}
writeln('(',a,'+',b,'+',c,')/3=',((a+b+c)/3):0:2);
end.
Ответ:
var a, b, c:integer;
begin
read(a, b, c);
writeln(a+b+c);
writeln(a*b*c);
writeln((a+b+c)/3)
end.