Предмет: Информатика, автор: hcjvvhhchcf

СРОЧНО, УМОЛЯЮ, ПРОШУ !!!!
ОЧЕНЬ НУЖНО, НЕ СОВСЕМ ПОНИМАЮ, КАК НУЖНО ВЫПОЛНИТЬ ЗАДАНИЕ . ПОЖАЛУЙСТА, НАПИШИТЕ РЕШЕНИЕ С ОБЪЯСНЕНИЕМ , СРАЗУ ПРЕДУПРЕЖДАЮ, ЧТО ЭТО ПАСКАЛЬ ​

Приложения:

Ответы

Автор ответа: DaniilTrahtenberg
0

Ответ:

var k, m: integer;

Dat: array[1..10] of integer;

Begin

m:=0

for k:= 1 to 10 do

m>Dat[k] then

begin

m:=Dat[k]

end;

writeln(m);

end.

Объяснение:

В первой строчке мы пишем переменные. integer говорит нам что числа целые, а не десятые.

Позже мы находим минимальное. m мы присваем значение какого-то из этих 15 чисел

Позже получается, что если m> другово числа, то m присваем значение этого числа

Похожие вопросы