Синформатикой,ту массивы на языке паскаль. задайте массив из 10 элементов с датчика случайных чисел.замените нулем элементы массива,которые больше введенного с
клавиатуры числа n.выведите на экран исходный и полученный массивы

Var a,n: integer; m: array [1..10] of integer; begin readln(n); for a: =1 to 10 do begin m[a]: =random(50); writeln (m[a]); end; writeln ('новый массив'); for a: =1 to 10 do begin if m[a]> n then m[a]: =0; writeln (m[a]); end; end.

Модель-тот кто показывает классные платья, макияж, туфли
Модель (2 значительность)-вещь которая в моде (очень популярна)

На паскале скажу:
var s,k: integer;
begin
s:=0;
for k:=3 to 10 do
s:=s+13;
write(s);
end.

s = 0
s =0+13 = 13
s=13
все)))

переведу на русский:
переменные s,k целые числа
начало программы
s = 0
k = от 3 до 10
s = 0+13
выводим s
конец программы

программа выводит ответ 13

А12. Какое устройство ПК предназначено для вывода информации?
Ответ. 2) монитор.