Портативный компьютер---это Карманный Персональный Компьютер(КПК)
var
a, b, a1, b1, cost, w, h: integer;
begin
readln(a, b, a1, b1, cost);
w := a div a1;
if a mod a1 <> 0 then inc(w);
h := b div b1;
if b mod b1 <> 0 then inc(h);
writeln(w * h);
writeln(w * h * cost);
end.
2.Код к задаче: «Удаление N-го элемента из списка - Prolog»
1.p([],N,'Error'):-N>0.
2.p([_|Tail],N,'Error'):-N1 is N-1,p(Tail,N1,"Error").
3.p([_|BL],1,BL).
4.p([AL|BL],N,[AL|CL]) :-N>1, N1 is N-1, p(BL,N1,CL).
Удачи, в информатике)
Начало
выкопать в земле ямку
опустить в ямку саженец
засыпать ямку с саженцем землей
полить саженец водой
Конец
Начало и конец в овале, остальное в прямоугольнике.
Эта презентация Вам в помощь : http://u.to/A4wWBQ