- 12.05.2018 13:35
- Информатика
- remove_red_eye 7685
- thumb_up 11
Ответы и объяснения 1
1.
var
a, b, c, s, p: integer;
begin
readln(a, b, c);
s:=a+b+c;
p:=a*b*c;
writeln(a, '+', b, '+', c, '=', s);
writeln(a, '*', b, '*', c, '=', p);
end.
2.
var
a, b, c, s, p: integer;
sr: real;
begin
readln(a, b, c);
s:=a+b+c;
p:=a*b*c;
sr := s/3;
writeln(a, '+', b, '+', c, '=', s);
writeln(a, '*', b, '*', c, '=', p);
writeln('(', a, '+', b, '+', c, ')/3=', sr);
end.
- 13.05.2018 16:42
- thumb_up 12
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.