?>
Как протестировать код program n_13_63; var a, b: integer; s, x: real; begin writeln (‘Подсчет суммы от продажи билетов’); writeln (‘Количество а непроданных билетов бизнес-класса’); readln (a); writeln (‘Количество b непроданных билетов экономического класса’); readln (b); writeln (‘Стоимость билетов бизнес-класса х‘); readln (x); s:=(40−a)*x+(120−b)*x/2; writeln (‘Билетов продано на ‘, s, ’ руб.’) end. 5-й этап Протестировать программу можно по следующим данным: а = 39, b = 119, х = 2000, s = 3000.
Ответы
Скачай компилятор Pascal или загугли онлайн компилятор, их куча.