Вопрос по информатике:
Нельзя преобразовать тип real к integer
program chees;
var m,n,s,k :real;
begin
readln(m);
readln(n);
s:=m*n;
If s mod 2<>0 then k := s /2+1
else k:=s/2;
writeln(k)
end.
- 02.04.2018 05:38
- Информатика
- remove_red_eye 7190
- thumb_up 29
Ответы и объяснения 1
Program chees;
var
m, n, s: integer;
k: real;
begin
readln(m);
readln(n);
s := m * n;
if s mod 2 0 then
k := s / 2 + 1
else
k := s / 2;
writeln(k)
end.
- 03.04.2018 00:09
- thumb_up 22
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.