Записать на языке Pascal последующие фразы:а)Даны три числа a,b,c.b)Если x четное

Записать на языке Pascal последующие фразы:
а)Даны три числа a,b,c.
b)Если x четное либо y четное,то с-это их среднее арифметическое,а иначе с-это остаток от дробления x на y.
c)Для k от 1 до 15 найди сумму значений параметра.
d)Умножай число x,пока оно не превзойдет 100.
e)Поменяй значения переменных a и b местами.

Задать свой вопрос
1 ответ
A)
Read(a,b,c)

b)
 if (x mod 2 = 0)or(y mod 2 = 0) then c:=(x+y)/2
     else c:= x mod y;

c)
S:=0;
For k:= 1 to 15 do
   S:=S+k;

d)
While xlt;=100 do
   x:=x*2;

e)
c:=a;
a:=b;
b:=c;
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт