1) 2 (командир полка) - для поддержания дисциплины в полке.
3 - для поддержания порядка в государстве.
4 - для поддержания порядка в кабинете.
5 - чтобы знать. как пользоваться компьютером.
6 - чтобы правильно решить задачу.
2) 1 - чтобы правильно решить пример.
2 - чтобы написать без ошибок.
3 - чтобы знать, какие уроки в какой день будут.
4 - для поддержания порядка в классе.
Var
N,A,k:integer;
P,S:real;
Begin
Write('N = ');ReadLn(N);
k:=0;
For N:= 1 to N-1 do
Begin
A:=N;
S:=0;
While A>0 do
Begin
S:=S+(A mod 10);
A:=A div 10;
End;
A:=N;
P:=1;
While A>0 do
Begin
P:=P*(A mod 10);
A:=A div 10;
End;
if S=P then
Begin
WriteLn(N);
k:=k+1;
End;
End;
if k=0 then WriteLn('Нет');
End.
var
z: integer;
begin
randomize;
z:=random (1000) -500;
writeln (z);
if z mod 3=0 then writeln (' число делится на 3')
else writeln (' число не делится на 3')
end.
Очень просто
запускаете двое часов одновременно, через три мин. переворачиваете часы на три минуты, через 6 мин. от начала еще раз переворачиваете их, когда закончится песок в часах на 8 мин, переворачиваете часы на три минуты, они как раз отсчитают две минуты так как на теперь уже нижней стороне оставалась минута до 9 минут, а на другой стороне 3-1=2минуты, 8+2=10.
str_1 = input("text: ")
print(str_1.split(" ")[0])