Дорогие ребята! У нас Pascal ABC, а нам задали задание 4, только без ошибок
Приложения:

Ответы на вопрос
Ответил Роман051
0
Детский сад ребята.
program task4;
var a, b, c: integer;
begin
writeln ('Введите три числа:');
readln (a, b, c);
if (a > b) and (a > c) then writeln (a);
if (b > a) and (b > c) then writeln (b);
if (c>a) and (c>b) theb writelb (c);
end.
program task4;
var a, b, c: integer;
begin
writeln ('Введите три числа:');
readln (a, b, c);
if (a > b) and (a > c) then writeln (a);
if (b > a) and (b > c) then writeln (b);
if (c>a) and (c>b) theb writelb (c);
end.
Ответил igorant
0
ок, спасибо большое !
Ответил Роман051
0
удачи на уроках
Ответил igorant
0
исправляй, у тебя ошибки который if (c>a) and (c>b) then writeln (c); а не theb writelb
Ответил igorant
0
elfxb
Ответил igorant
0
удачи
Новые вопросы
Английский язык,
2 года назад
Английский язык,
2 года назад
Математика,
7 лет назад
Физика,
7 лет назад
Математика,
9 лет назад