c = 15 c = 2.00 c = 25 c = 9
c = 3 c = 1 c = 100 100
'qm' c = '' c = school2 error
Объяснение:
+ сложение(если строку str складывают с другой они просто скрепляются
// деление с выделением целой части
/ обычное деление чисел (происходит в формате float) даже если ответ целое число мы показывает десятые и сотые числа
% деление с выделением остатка
* умножение (если строка str умножается на целое число, то эта строка пишется несколько раз БЕЗ ПРОБЕЛА
** возведение в степень
max функция которая ищет максимум
строку на строку перемножать нельзя программа ложиться и выдаёт ошибку
const z = 10;
var
a: array[1..z] of integer;
i, n, s: integer;
begin
readln(n);
for i := 1 to z do begin
a[i] := random(100);
write(a[i], ' ');
if(a[i] > n) then s := s + a[i];
end;
writeln;
writeln('Сумма эл. > ', n, ' : ', s);
end.