Регистрация
leramailvorob
26.09.2021 04:58
Информатика
Есть ответ 👍

2019 жылдың тамызында Бейжіңде роботтардың дүниежүзілік конференциясында өнертапқыштар ұсынған жаңа өнім.
Бұл робот науқастардың омыртқасына, миына, жүрегіне күрделі оталарды жасай алады,
отадан кесілген жерлерге тігістер жасай алатын жоғары білікті маман.

Егер көмектессендер лучший ответь даммм​

255
395
Посмотреть ответы 1

Ответы на вопрос:

Skvaler
Skvaler
4,6(83 оценок)

1 вариант:

var

a, b, c, min: integer;

begin

min: =0;

readln(a, b, c);

if (a< b) and (a< c) then min: =a;

if (b< a) and (b< c) then min: =b;

if (c< a) and (c< b) then min: =c;

writeln(min);

  end.

2 вариант:

var a: array[1..3] of integer;

i,z: integer;

begin

for i: =1 to 3 do

readln(a[i]);

z: =a[1];

for i: =2 to 3 do

begin

if a[i]< z then z: =a[i];

end;

writeln(z);

end.

Популярно: Информатика