Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 15.07.2016 03:58
- Информатика
- remove_red_eye 3133
- thumb_up 33
Ответы и объяснения 1
Var
a,b,c,d,e,f:integer;
otv:real;
begin
Readln(a,b,c,d,e,f);
otv:=a+b+c+d+e+f;
otv:=otv/6;
Writeln(otv:7:3)
end.
7.) Program z1;
Var
a:integer;
begin
Readln(a);
Writeln(a+a*0.1)
end.
Должно работать, но лучше набрать и проверить работает ли. Надеюсь помогла)
- 16.07.2016 22:14
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.