Const int neededInputs = 8;
try
{
int counterNegativeNumbers = 0;
int counterInLoop = 0;
while (counterInLoop < neededInputs)
{
Console.WriteLine("Type a number, please ");
int number = Int32.Parse(Console.ReadLine());
if(number < 1)
counterNegativeNumbers++;
counterInLoop++;
}
Console.WriteLine(String.Format("You`ve written {0} negative or zero numbers", counterNegativeNumbers));
}
catch(FormatException ex)
{
Console.WriteLine("Invalid format of the number");
}
<span>var
a: array [1..100] of integer;
i, n , max : integer;
begin
writeln('rozmer');
readln(n);
randomize ;
if (( n>=1) and (n<=35)) then
for i:=1 to n do begin
a[i]:=random(90)-45 ;
write(a[i]:3);
end;
writeln;
max:=a[1] ;
for i:=2 to 100 do begin
if a[i]>max then max:=a[i] ;
end;
writeln(max);
end<span>.</span></span>
Экзамен числами, то есть 0-положительно, 1-отрицательно.
1) Условие неполное. Что делать с числами 0, 5, 10 ... 1000?
2)
var a,b,c,max: integer;
begin
writeln('Введите 3 числа через пробел:');
readln(a,b,c);
if a>b then max:=a else max:=b;
if c>max then max:=c;
writeln('max=',max);
<span>end.</span>
var a: real;
begin
readln(a);
writeln((2 * a * a * a + 8)/(3 * a));
end.