Всего 19 спортсменов,отличных оценок по математике 0 ,2 плавца умеют ходить на лыжах
////////Pascal abc///////////
<u>Результат:</u>
-2 44 30 -18 43 19 39 42 -25 -4 33 36 -15 41 44
s=371<span>
</span>
Ответ: 3
Объяснение: Допустим, 123. Всё неправильно. Тогда 312. Если опять не сошлось, то остаётся только 231.
Var a:integer;
begin
repeat
// число, которое надо ввести - 47
writeln('Введите двузначное число');
readln(a);
until a<>47;
writeln('Введенное число ', a);
end.
using System;
namespace Znanija {
class Task {
static void Main(string[] args) {
int c, n=0, a=0, b=0;
while (Int32.TryParse(Console.ReadLine(), out c) && c != 0) {
if (a > 0 && b > a && b > c) n++;
a = b;
b = c;
}
Console.WriteLine(n);
}
}
}