1. дано целое число. если оно чётное, то увеличить на 10, если нечётное, то уменьшить на 10. 2. известны - id953846820221218 от ekaterinakuzeny 18.12.2022 16:58

Question

Информатика: 1. дано целое число. если оно чётное, то увеличить на 10, если нечётное, то уменьшить на 10. 2. известны два расстояния: одно в километрах, другое - в футах (1 фут = 0,45 м). какое из расстояний меньше? (в километрах или в футах). 3. найти значение выражения (y) или указать, что оно не существует. y=(x*x-3x+15)/(x-10), если х дано с клавиатуры.

ekaterinakuzeny · Accepted Answer

Var A,B:real; Begin //1 Write( Длина = );ReadLn(A); Write( Ширина = );ReadLn(B); WriteLn( S = ,A*B); WriteLn( P = ,2*(A+B)); //2 WriteLn; Write( Кол-во денег: );ReadLn(A); Write( Стоимость покупки: );ReadLn(B); WriteLn( Сдача: ,A-B); //3 WriteLn; Write( Расстояние: );ReadLn(A); Write( Стоимость проезда 1 км: );ReadLn(B); WriteLn( Стоимость проезда ,A, км: ,A*B); //4 WriteLn; Write( Цена товара: );ReadLn(A); Write( Вес покупки: );ReadLn(B); WriteLn( Цена покупки: ,A*B); //5 WriteLn; Write( Объём...

MOGZ ответил