В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.
Var k, m: integer;
Dat: array[1..10] of integer;
Begin
Dat[1] := 12; Dat[2] := 15;
Dat[3] := 17; Dat[4] := 15;
Dat[5] := 14; Dat[6] := 12;
Dat[7] := 10; Dat[8] := 13;
Dat[9] := 14; Dat[10] := 15;
m := 20;
for k := 1 to 10 do
if Dat[k] < m then
begin
m := Dat[k]
end;
writeln(m);
End.

Ventana1263   ·   20.04.2020 17:27
Ответов: 2 Показать ответы 10 Обсудить

Другие вопросы по Информатике

Дано трехзначное число n. определить будет ли сумма его цифр четным числом...
Информатика
01.03.2019 03:10
4 ответ(ов)
Сколько байт потребуется для хранения информации ,содержащейся? в шпаргалке, если ее текст содержит 50 строк по 50 символов в строке, а информация о форматировании текста составля...
Информатика
01.03.2019 10:30
3 ответ(ов)
Дано натуральное число. найти минимальную цифру....
Информатика
02.03.2019 02:00
3 ответ(ов)
Поогите составить загадки с отгадками телефон стол дискета...
Информатика
02.03.2019 14:50
4 ответ(ов)
"адреса машинных слов меняются с шагом 2. адрес последнего машинного слова в шестнадцатеричном представлении равен 7fe. объем оперативной памяти компьютера равен 1) 2047байт 2) 102...
Информатика
02.03.2019 16:50
4 ответ(ов)
Создать массив из пяти чисел вводом с клавиатуры и посчитать сумму элементов массива(в паскале)...
Информатика
06.03.2019 18:10
3 ответ(ов)
Выравнивание текста, при котором с обеих сторон каждой строки ширина свободного пространства одинакова.13 букв....
Информатика
07.03.2019 14:40
2 ответ(ов)
Для вывода на экран произвольной символьной строки нужно в команде вывода записать эту строку в апострофах. например, по команде вывод "ответ" на экран выведется слово ответ. опред...
Информатика
07.03.2019 20:10
3 ответ(ов)
Надо решать через паскаль. составил две программы и обе со странным ответом. что не то? program qwe; uses crt; var x.s: integer; y: real; begin s: =0; for i: = -2 to 27 do s:...
Информатика
07.03.2019 20:41
4 ответ(ов)
Число из трех цифр отняли от числа, которое складывается с тех самых цифр, размещенных в обратном порядке. результат складывается из тех самых цифр, размещенных опять по другому. н...
Информатика
08.03.2019 05:10
2 ответ(ов)
Найти сумму и среднее арифметическое положительных элементов массива a(n)...
Информатика
09.03.2019 12:10
2 ответ(ов)
Как связаны между собой слова автомобиль, самолёт, стул и стол? решите побыстрей тороплюсь!...
Информатика
09.03.2019 21:30
2 ответ(ов)
Самые популярные сегодня