в чём ошибка(программирование на паскаль)?

Question

Поделиться 0

в чём ошибка(программирование на паскаль)?

Вопрос решен и закрыт.

11 лет

помогите найти ошибку, задача:
ввести 2 числа меньшее заменить a+b/2, а большее заменить a*b*2.на паскале, после ввода цифр показывает один ответ и всё.
program abc;
var a,b:real;
begin
writeln('введите число a'); read(a);
writeln('введите число b'); read(b);
if a>b then begin
write(a*b*2);
write(a+b)/2);
end;
if a<b then begin
write((a+b)/2);
write (a*b*2);
end;
end.

11 лет

переправил теперь выполняет первое условие а второе нет

11 лет Просмотров: 180

4 0

Accepted Answer

поменяй везде write на writeln
Write пишет без перевода строки. Ответа два, но второй затирает первый

угу и со скобками )

Лучший ответ

Ответы

Похожие вопросы