Никелевая руда содержит 1,3% никеля. сколько тонн никеля получится из 24860 тонн руды? сколько тонн этой руды надо переработать, чтобы добыть 2405 тонн никеля.
Из 24860 т руды получится никеля : 24860 * 1,3 /100 = 323,18 т Чтобы добыть 2405 т никеля нужно переработать (2405 /1,3) * 100 = 185000 т никелевой руды
Я так понимаю, ты пишешь программу, которая говорит, сколько тебе лет)) Во-первых, её можно упростить. Во-вторых, ты в одном месте не поставил ;. Напишу примерный вид программы, которая должна работать:
Program Vozrast; var i: integer; begin writln ('Введите возраст: '); readln(i); if (i < 1) or (i > 150) then writeln ('Это туфта, насяльника!'); if (i <> 11) and (i mod 10 = 1) then writeln (i, 'год'); if ((i<10) or (i>20)) and ((i mod 10 = 2) or (i mod 10 = 3) or (i mod 10 = 4) then writeln (i, 'года'); if ((i > 9) and (i < 21)) or ((i mod 10 = 5) or (i mod 10 = 6) or (i mod 10 = 7) or (i mod 10 = 8) or (i mod 10 = 9) or (i mod 10 = 0)) then Writeln (i, 'лет'); end.
Я так понимаю, ты пишешь программу, которая говорит, сколько тебе лет)) Во-первых, её можно упростить. Во-вторых, ты в одном месте не поставил ;. Напишу примерный вид программы, которая должна работать:
Program Vozrast; var i: integer; begin writln ('Введите возраст: '); readln(i); if (i < 1) or (i > 150) then writeln ('Это туфта, насяльника!'); if (i <> 11) and (i mod 10 = 1) then writeln (i, 'год'); if ((i<10) or (i>20)) and ((i mod 10 = 2) or (i mod 10 = 3) or (i mod 10 = 4) then writeln (i, 'года'); if ((i > 9) and (i < 21)) or ((i mod 10 = 5) or (i mod 10 = 6) or (i mod 10 = 7) or (i mod 10 = 8) or (i mod 10 = 9) or (i mod 10 = 0)) then Writeln (i, 'лет'); end.
Чтобы добыть 2405 т никеля нужно переработать (2405 /1,3) * 100 = 185000 т никелевой руды