Ввести 2 числа и к большему прибавить 2 а к меншее разделить на 3

196

267

Посмотреть ответы 2

Ответы на вопрос:

afashahbazova

Информатика

4,6(6 оценок)

Vara,b,c,d : real; beginwriteln('введите первое число : '); readln(a); writeln('введите второе число : '); eadln(b); f a < b thenbeginc : = b + 2; d : = a/3; end; f a > b thenbeginc : = a + 2; d : = b/3; end; writeln('первое число : ', c); writeln('второе число : ', d); end.

rzd1

Информатика

4,6(60 оценок)

На Pascal. Если нужен C++, то пиши на мыло. program q171331171; var i: integer; begin for i := 1 to 20 do if i mod 2 = 0 then Write(i:2, ' '); WriteLn; for i := 20 to 30 do if i mod 2 = 1 then Write(i:2, ' '); WriteLn; ReadLn; end.