Английский:
“In addition to word processors designed for
creating and processing words on a computer, there are a number of
programs that automate human work
with text information ". The result obtained using
translate the same program into Russian. This text
the original phrase and the final result. Give your comments
tari.
Казахский:
«Арналған мәтіндік процессорлардан басқа
сөздерді компьютерде құру және өңдеу, олардың саны бар
адам жұмысын автоматтандыратын бағдарламалар
мәтіндік ақпаратпен ». Пайдалану арқылы алынған нәтиже
сол бағдарламаны орыс тіліне аударыңыз. Бұл мәтін
түпнұсқа фраза және соңғы нәтиже. Түсініктемелеріңізді беріңіз
тарих.
Объяснение:
Выбери язык который больше нравится
Program Massive;
uses Crt;
const
M = 6;
var
D: array [1..M] of real;
i: integer;
sum: real;
indexMax: integer;
begin
ClrScr;
Randomize;
writeln ('Massive:');
indexMax := 1;
D[1] := 10;
D[1] := D[1] - Random(20);
writeln (D[1]);
for i:= 2 to M do
begin
D[i] := 10.0;
D[i] := D[i] - Random(20);
writeln (D[i]);
if (D[i] > D[indexMax]) then
begin
indexMax := i;
end;
end;
writeln ('indexMax = ', indexMax);
sum := 0;
for i:= indexMax + 1 to M do
if (D[i] < 0) then sum := sum + D[i];
writeln ('Sum = ', sum);
readln
end.