На языке паскаль составить программу , выводящую на экран наименьшее из трех чисел.программа должна выводить на экран результат в виде: наименьшее из данных трех чисел=значение.
115
439
Ответы на вопрос:
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.
Популярно: Информатика
-
UraR129.07.2020 05:02
-
Angelina1232320.11.2020 03:26
-
akerkebaidylda21.01.2023 09:40
-
kuryaevm24.10.2022 21:50
-
alenavol200503.05.2022 22:12
-
алексей04120.04.2022 05:14
-
korolevandrej4828.04.2022 00:07
-
Студентка16епта17.04.2022 03:16
-
arturshubin2402.07.2021 00:42
-
milena22629.01.2022 11:38