понять метод составления алгоритма. Первоклассник на перемене прибегает в школьную столовую, зажав в кулаке монетки. Неизвестно, сколько у него денег. Он хочет купить самую вкусную булочку, в столовой есть три вида булок - по 30, 22 и 15 рублей. Чем булка дороже, тем, по мнению первоклассника, она вкуснее. Первоклассник умеет считать свои деньги и умеет сравнивать два числа (ровно два, он не может сказать, попадает ли какое-то число в промежуток между двумя другими, он может только сказать больше или нет число А числа Б).

Составить блок-схему или написать пошаговый алгоритм, который позволит первокласснику купить самую вкусную из доступных ему булок.

Var

N,A:integer;

Begin

Write('N = ');Read(N);

A:=0;

While N>0 do

  Begin

  if (N mod 10) > A then A:= N mod 10;

  N:=N div 10;

  End;

Write(A)

End.

Var

N,A,B:integer;

C:boolean;

Begin

Write('N = ');Read(N);

A:=-1;

B:=-2;

C:=false;

While N>0 do

  Begin

  if A=B then C:=true;

  if N>0 then

     Begin

     A:=N mod 10;

     N:=N div 10;

     End;

  if A=B then C:=true;

  if N>0 then

     Begin

     B:=N mod 10;

     N:=N div 10;

     End;

  End;

if A=B then C:=true;

if C then Write('Есть')

else Write('Нет')

End.

Подробнее - на -

Какие значения чисел:
0.85Е2 =85
-5.7Е-3 = -0.0057
0.1Е4=1000

Что будет выведено на экран после выполнения следующих команд:
a-435c
c=    35.1b=   -435  280.126-435

Вычислить значения выражений:
Round(frac(6.9)); = 1
20 mod 6 * 3; = 6
sqrt(trunc(0.5)) = 0

Записать выражения в общепринятой форме:
(-3ab+(b-4*a*c)^2)/корень(2*a);
(корень(|a-b|)*(a+b)^2.

a) y:= y * 2; правильная. операция возможна для вещественных чисел.
в) х:= х mod 3 + х*cos(0); правильная, все опрации подходят для целых чисел
б) x:=trunc(y); правильная
г) x:= y+1. неверно нельзя преобразовать вещественный тип в целый