C# Перевести из Паскаля в C#
uses crt;
const n=3;

var
i,max,min: integer;
mas:array[1..n] of integer;
begin
clrscr;
randomize;

for i:=1 to n do
begin
write('Масса ',i, ' человека = '); Readln(mas[i]);
end;

max:=mas[1];
min:=mas[1];

for i:=2 to n do
begin
If mas[i] max Then
max:=mas[i];
end;

If (max/2)>min Then
writeln('Масса самого тяжелого человека превышает массу самого легкого более чем в два раза')
Else
writeln('Масса самого тяжелого человека НЕ превышает массу самого легкого более чем в два раза');
end

PolinaReyblogger    1   25.11.2020 14:43    2