1)это направление куда будут двигаться все обьекты
2)число равное тому сколько раз исполнитель повторит ваш алгоритм
Ответ дал: Гость
var
a: array[1..31] of real;
i,k: integer;
min: real;
begin
min: =50;
for i: =1 to 31 do
begin
readln(a[i]);
if a[i]< min then min: =a[i];
end;
k: =0;
for i: =1 to 31 do
if a[i]=min then k: =k+1;
writeln(k);
end.
Ответ дал: Гость
ваня на п
саша на в
коля на с
петя на к
Ответ дал: Гость
Program is_ev_2d; var n: integer; begin write('введите число: '); readln(n); if (n mod 2 = 0) and (n > 9) and (n < 100) then writeln(n, ' чётное двузначное') else writeln(n, ' не чётное двузначное') end.
Популярные вопросы