Pascal. 40 баллов (не вру). Задание: ** вход подаются два числа: a и b. Вывести...

0 голосов
51 просмотров

Pascal. 40 баллов (не вру). Задание: На вход подаются два числа: a и b. Вывести наибольшее из них, а затем решить 5*min – 156. Я написала: program qq; var a, b, min: integer; begin readln (a,b); min:=a; if (a>b) then min:=b; writeln(min); end; var a, b, min: integer begin writeln (a) readln (a) writeln (b) readln (b) writeln (min) readln (min) writeln ('5*min – 156'; '5*min – 156') end. Не особо шарю, помогите. Что не так, и как правильно сделать? Молююю!


Информатика (573 баллов) | 51 просмотров
Дан 1 ответ
0 голосов

Все крайне просто (20 символов нужно написать)


image
(22 баллов)
0

спасибо!

0

program qq;var a, b, min: integer;beginreadln (a, b);if (abeginmin:= a;max:= b;endelsebeginmin:= b;max:= a;end;writeln (IntToStr (max));writeln (IntToStr (5*min-156));end.

0

ой

0

program qq;var a, b, min: integer;beginreadln (a, b);if (abeginmin:= a;max:= b;endelsebeginmin:= b;max:= a;end;writeln (IntToStr (max));writeln (IntToStr (5*min-156));end.

0

оно не отправляется так как надо