Question

Одна головка сыра весит 2кг 300г; сколько весят М головок сыра? (ответ дать в кг и г)
!!!НАДО СОСТАВИТЬ ЛИНЕЙНЫЙ АЛГОРИТМ В ПАСКАЛЕ!!!

Answer 1

program k23;var a, m:integer;begina:=2300;readln(m);a:=a*m;writeln(a div 1000, ' кг ', a-1000*(a div 1000), ' гр');end.