4 года назад

Чото означают эти знаки?

Знания

Информатика

1 ответ:

marussya1986 [7]4 года назад

0 0

1 и 2 увеличение окна по диагонали 3 перемещение окна 4 я не знаю 5 справка 6 невозможно выполнить действие (напр. переместить файл в определённую папку) 7 и 8 увеличение окна по горизонтали и вертикали 9 ожидание ответа

Читайте также

помогите решить задания в программе паскаль:1) вычислить произхведение сумм положительных и отрицательных элементов целочисленно

Bremem

program ms;
uses crt;
var a:array [1..10] of integer;
l,k,s,i:longint;
begin
clrscr;
writeln('Введите 10 элементов массива');
for i:=1 to 10 do
begin
readln(a[i]);
if a[i]<0 then l:=l+a[i];
if a[i]>0 then k:=k+a[i];
end;
s:=l*k;
writeln(s);
readkey;
end.

0 0

4 года назад

В даном массиве з 20 действительных чисел найти произведение элементов,которые меньше за среднее арифметическое

desedent [321]

Program a_86betiri;
uses crt;
const n=20;
var
a:array[1..n] of real;
sum, mt: real;
i:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('***          OK             ***');
sum:=0;
mt:=1;
randomize;
for i:=1 to n do
    begin
      a[i]:=random(100);
      sum:=sum+a[i];
    end;
writeln('Элементы массива:');
for i:=1 to n do
    begin
      if a[i]<(sum/n) then
      mt:=mt*a[i];
      write (a[i]:7:2);
    end;
   writeln();
   writeln('Произведение элементов, меньших, чем среднее арифметическое: ',mt);
end.