Question

Язык Pascal. Напишите программу, которая позволяет вводить с клавиатуры 4 числа и выводить на
экран номер наибольшего из них. Числа могут содержать дробную часть, Номер числа в
последовательности - целое число.​

Answer 1

var xy:integer;

begin

readln (xy);

if (x>0) and (y>0) then writeln ("); if (x>0) and (y0) then writeln (IV');