Помогите решить задание по информатике. Никак не могу разобраться, как решать такого вида задания
var m, i: integer; Mas: array [1..10] of integer; begin mas[1]:=15; mas[2]:=10; mas[3]:=12; mas[4]:=6; mas[5]:=5; mas[6]:=14; mas[7]:=9; mas[8]:=17; mas[9]:=25; mas[10]:=11; m:=mas[1]; for i:=2 to 10 do if Mas[i] < m then m:= Mas[i]; write(m) end. ответ 5 почему
Помогите пожалуйста История эволюции вычислительных систем: характеристика первого периода (1945–1955 гг.) и второго периода (1955 г.–начало 60-х). третьего периода (начало 60-х – 1980 г.) и четвертого периода (с 1980 г. по настоящее время).
Не много но чтоб понятно было пожалуйста.
Коротко и понятно пожалуйста
Пж помогите, включаю компьютер на виндовс 10,после загрузки обновы все было норм, потом я долго не пользовался компом, и я включаю его, он загружается и пишет, изменения внесенные в ваш компьютер отменяются, И он вырубается и опять врубается, и тоже самый текст появляется бесконечно, даю 36 баллов и корону
Ввести свою фамилию. Вывести её горизонтально с промежутком между буквами (паскаль) СРОЧНО!!!
Напишите программу для получения квадратной матрицы порядка n* n.
Зачёт!!! Имя, тип, путь доступ к файлу