Из 18 т железной руды выплавляют 10 т железа. сколько железа выплавят из A т руды Помогите пожалуйста 17 баллов программу надо составить!!!
Uses crt;var a,b:real;beginwriteln('Введите сколько тон вы хотите переплавить');readln(a);b:=(10/18)*a;writeln(b,'Тон получится ');end.
uses crt; var a,b:real; beginwriteln('Введите сколько тон вы хотите переплавить'); readln(a); b:=(10/18)*a; writeln(b,'Тон получится '); end.
36