Дна последовательность неотрицательных чисел, последнее из которых Равно нулю:…

Question

67

Дна последовательность неотрицательных чисел, последнее из которых Равно нулю: причем других равных нулю чисел в последовательности нет. Найтипоследнее число, больше десяти, в этой последовательности. Если таких чисел нет, напечатать ноль.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

andrey_9791 · Accepted Answer

51

andrey_9791

29 августа 2022

Var a, k: realBEGINuses crt; clrscr; write ('Vvedite 1 chlen posledovatelnosti'); readln (a); k: =0; while a > 0 dobeginif (a > 10) then k: =a; write ('Vvedite ocherednoy chlen posledovatelnosti'); readln (a); end; writeln (k); END.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: