Даны два целых неравных числа a и b. составить алгоритм определения знака разности a-b не вычисляя разность. - id300100720230405 от радмир1402 05.04.2023 13:28

Question

Информатика: Даны два целых неравных числа a и b. составить алгоритм определения знака разности a-b не вычисляя разность. разрешается сравнивать числа a и b с нулем, а между собой сравнивать только модули чисел a и b

радмир1402 · Accepted Answer

Var a: byte; b:integer; Begin  writeln( Введите день месяца ); readln(b); writeln( Введите номер месяца );    Readln(a);               Case a of         1: writeln(b, янавря );         2: writeln(b, февраля );       3: writeln(b, марта );         4: writeln(b, апреля );       5: writeln(b, мая );       6: writeln(b, июня );         7: writeln(b, июля );        8: writeln(b, августа );      9: writeln(b, сентября );      10: writeln(b, октября );      11: writeln(b, ноября );        12: writeln(b,...

MOGZ ответил