Условие:
Написать программу вычисления стоимости некоторого количества (по весу) яблок
Решение:
Программа :
program pr1;
var k,S,A:real;
begin
write('Введите цену яблок за килограмм ');
readln(S);
write('Введите в...

Написать программу вычисления стоимости некоторого количества (по весу) яблок
Программа :
program pr1;
var k,S,A:real;
begin
write('Введите цену яблок за килограмм ');
readln(S);
write('Введите в...
Не нашел нужную задачу?