Есть ответ 👍

На языке паскаль составить программу , выводящую на экран наименьшее из трех чисел.программа должна выводить на экран результат в виде: наименьшее из данных трех чисел=значение.

115
439
Посмотреть ответы 2

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


Var a, b, c: real; begin       readln(a, b, c);       if (b < a) then a : = b;       if (c < a) then a : = c;       writeln(' наименьшее из данных трех чисел =  ', a); end.

program m2;

var i,x : integer ;

A: array[0..15] of integer;

begin

for i := 1 to 15 do

A[i] := 6 * sqr(i);

for i := 1 to 15 do

writeln (A[i]);

end.

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