1)для работы .2)из системного, блока, мыша, монитора и клавиатуры 3) с некоторыми программами и инструмент для создания новых идей 4)инструмент 5)больше 300 рублей (в моём стране больше 100 манат)
Program FORSLENDER;
uses crt;
var l,a: integer;
begin clrscr;
write('l = ');
readln(l);
a:=(l div 100 );
writeln('Otvet = ', a);
readln;
end.
Система пятеричная. Закончил университет в 24(4*5+4)года, через год 25(1*25+0+0) летним молодым ...... женился на 19(3*5+4) летней девушке. Небольшая разница 6(1*5+1)лет.Мы жили ...... семья, всего 5(1*5+0) детей
<em>var a,x,k:integer;
</em>
<em>begin
</em>
<em>write('Введите натуральное число: ');
</em>
<em>read(a);
</em>
<em>x:=a;
</em>
<em>k:=0;
</em>
<em>while (x>0) do
</em>
<em>begin
</em>
<em>if (x mod 2=0) then k:=k+1;
</em>
<em>x:=x div 10;
</em>
<em>end;</em>
<em>writeln('Количество четный цифр= ',k);</em>
<em>end.</em>