Напечатать таблицу соответствия между весом в фунтах и весом в килограммах 1, 2, ..., 10 фунтов (1 фунт= 453 гр.) в Pascal. ABC Обязательно блок схема

для того что было понятнее обозначим берег на котором солдаты "1", а второй берег "2".сначала через реку переплывают вдое мальчиков на берег 2, один остается другой возращается обратно на берег 1, переплывает солдат и отдает лодку мальчику на берегу 2, который в свою очередь переплывает на берег 1, забирает брата и переплывают вдвоем на берег 2. и данный алгоритм повторяется пока все солдаты не переправятся.

2000*2000=4000000 пикселей=4 мегапикселей

program e7;

var x: integer;

begin

writeln('vvedite znachenie gradusnoi meri ugla');

readln(x);

if a=180 then writeln('razvernutii') else writeln('ne razvernutii');

readln;

end.

если вы работаете в школе на программе freepascal, то перед "end" можно "readln" не писать. если же вы работаете на программе turbopascal, "readln" перед "end" обязательно нужно писать.

обьем вини изначальный

прирост от меда

прирост от сгущенки

время реализации прироста

время худенья

радиус дверей