Помогите плиз написать программу на Паскале. На первой фотке то, по чему надо писать программу, далее дополнительная инфа
очень срочно!! добавлю баллы за правильный ответ!!!!!!!!!
Приложения:



Ответы на вопрос
Ответил D9tel
0
var
a,b,c:real;
begin
write('Введите значение A=');read(a);
write('Введите значение B=');read(b);
if A>B then
c:=a
else
c:=b;
write('C=', c);
end.
//////////////////////////////////////////
Входные данные:
A=2
B=5
///////////////////////////////////////////
Выводные данные:
C=5
a,b,c:real;
begin
write('Введите значение A=');read(a);
write('Введите значение B=');read(b);
if A>B then
c:=a
else
c:=b;
write('C=', c);
end.
//////////////////////////////////////////
Входные данные:
A=2
B=5
///////////////////////////////////////////
Выводные данные:
C=5
Ответил Natashka501
0
Спасибо!
Ответил vladmor
0
var
a, b, c: integer;
begin
write('Введите a,b ');readln(a,b);
if a>b then c:=a else c:=b;
writeln('c = ',c);
end.
Тест №1
Введите a,b 5 6
c = 6
Тест №2
Введите a,b 7 5
c = 7
a, b, c: integer;
begin
write('Введите a,b ');readln(a,b);
if a>b then c:=a else c:=b;
writeln('c = ',c);
end.
Тест №1
Введите a,b 5 6
c = 6
Тест №2
Введите a,b 7 5
c = 7
Ответил Natashka501
0
Большое спасибо!!
Ответил vladmor
0
Пожалуйста, успехов!
Новые вопросы
Биология,
2 года назад
Геометрия,
2 года назад
Математика,
9 лет назад
Математика,
9 лет назад
Математика,
9 лет назад
Физика,
9 лет назад