Question

из 18 т железной руды выплавляют 10 т железа. сколько железа выплавят из A т руды
Помогите пожалуйста 17 баллов программу надо составить!!!

Answer 1

uses crt;var a,b:real;beginwriteln('Введите сколько тон вы хотите переплавить');readln(a);b:=(10/18)*a;writeln(b,'Тон получится ');end.

Answer 2

uses crt;
var a,b:real;
beginwriteln('Введите сколько тон вы хотите переплавить');
readln(a);
b:=(10/18)*a;
writeln(b,'Тон получится ');
end.

Answer 3

36