Решение задачи 1 в файле Задача 2 если в классе 2 ученика, то после обмена будет 2 фотографии 2*(2-1)=2 если в классе 3 ученика, то всего будет 6 фотографий: 3*(3-1)=6 4 ученика 12 фотографий:4*(4-1)=12 х учеников по условию 600: х*(х-1)=600 откуда x^2-x-600=0 дискриминант 2401 х1=-24(не подходит) х2=25 ответ 25 По задаче 3 нет данных
Const nn=100; { максимальное значение n } var i,n,k,s:integer; a:array[1..nn] of integer; begin Write('Укажите натуральное число n: '); Read(n); Randomize; k:=0; s:=0; Writeln('Сформированная последовательность'); for i:=1 to n do begin a[i]:=Random(99)+1; { случайное число на интервале [1;99] } Write(a[i]:3); if (a[i] mod 5=0) and (a[i] mod 7 <>0) then begin Inc(k); s:=s+a[i] end; end; Writeln; Writeln('Количество чисел, кратных пяти: ',k); Writeln('их сумма равна ',s) end.
Задача 2 если в классе 2 ученика, то после обмена будет 2 фотографии 2*(2-1)=2
если в классе 3 ученика, то всего будет 6 фотографий: 3*(3-1)=6
4 ученика 12 фотографий:4*(4-1)=12
х учеников по условию 600: х*(х-1)=600
откуда x^2-x-600=0 дискриминант 2401 х1=-24(не подходит)
х2=25 ответ 25
По задаче 3 нет данных