Question

Паскаль 1. Составить программу для нахождения наименьшего числа из трех. 2. Написать программу на языке программирования Паскаль, которая будет соответствовать следующей блок-схеме:

Answer 1

1 задание
begin
var m,a,b,c:integer; 
println('Ввести 3 значения через пробел');
read(a,b,c);
m:=min(a,b);
m:=min(m,c);
print(m);
end.
2 задание
begin 
var d,a, b, c: integer;
println('Ввести 3 значения через пробел'); 
read(a, b, c); 
if(a < c) then   
d := a; 
if(b<c) then 
a:=d; 
d:=d+a; 
print(d);
end.