Var numb,sot,des,ed:integer;
begin
readln(numb);
sot:=numb div 100;
des:= numb mod 100;
des:= des div 10;
ed:= numb mod 10;
writeln(sot,' ',des,' ',ed);
end.
Таблицы - в прилагаемых файлах.
За это оцени Спасибо,плиз.Я старался)
Вот фото.вся формула обозначена как Ф
Сделай папрезентацию на тему компьютер, опиши все его состовляющие, и без чего он не сможет работать. ИЛи на тему Современное вооружение России