ХЕЛП 25 ДАЮ  Запишите текст программы в тетрадь:
Program number_1;
var a, c :Real;
begin
readln(a);
a:=15-a;
c:=a/2+4;
a:=2*c+a;
writeln(a)
end.
 Определите, что будет напечатано в результате работы следующей
программы, если а = 10?
 Наберите текст программы в PascalABC.
 Протестируйте программу для a = 10.

LadaSova    2   20.01.2022 21:01    2