Ответ:
15) 23024) 36818) 27633) 506
Объяснение:
program UserInputX;uses crt;var X: Integer; A: Real;begin clrscr; write('Введите число Х:'); readln(X); A := (X / 3) + (X * 15); writeln('Число А:', A:6:2);end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Ответ:
15) 230
24) 368
18) 276
33) 506
Объяснение:
program UserInputX;
uses crt;
var
X: Integer;
A: Real;
begin
clrscr;
write('Введите число Х:');
readln(X);
A := (X / 3) + (X * 15);
writeln('Число А:', A:6:2);
end.