Ответ:
Вот так ты имел в виду, я просто не понял, что там точно нужно сделать! Если не то, скажи, исправлю!
Объяснение:
var N, K, sum:real;
begin
writeln('Введите количество книг N, которые меньше 20:');
read(N);
writeln('Введите стоимость одной книги:');
read(K);
sum := N * K;
write(sum,' тенге');
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Вот так ты имел в виду, я просто не понял, что там точно нужно сделать! Если не то, скажи, исправлю!
Объяснение:
var N, K, sum:real;
begin
writeln('Введите количество книг N, которые меньше 20:');
read(N);
writeln('Введите стоимость одной книги:');
read(K);
sum := N * K;
write(sum,' тенге');
end.