СОСТАВТЕ ПРОГРАММУ КОТОРАЯ ПРОВЕРЯЕТ РАВНЫ ЛИ 3 ВВЕДЁНЫХ ЧИСЛА И ВЫВОДИТ НА ЕКРАН СООТВЕТСТВУЮЩЕЕ СООБЩЕНИЕ "РАВНЫ " ЛИБО "НЕ РАВНЫ"
VAR A, I: INTEGER; BEGIN READLN(A, I); WRITELN((A = I ? "РАВНЫ" : "НЕ РАВНЫ")); END.
В КУБЕЙСИКЕ
СМЫСЛ НЕ МЕНЯЕТСЯ, Я ТОЛЬКО ВАСИКА, ВАСИКА 6.0 И ВАСИКАдотНЕТ ЗНАЮ
НУ ПЛИЗ В КУБЕЙСИКЕ
ДУМАЮ, ТАК
DIM A, I AS INTEGER READ A, I IF (A = I) THEN PRINT "=" ELSE PRINT "NO =" END IF
ПИШЕТ НЕТ ДАННЫХ И ВЫДЕЛЯЕТ СЛОВО READ
ВСУНЬ ТУДА ОПЕРАТОР СЧИТЫВАНИЯ, Я ЕГО НЕ ЗНАЮ