Цикл с постусловием. Подсчитать кол-во цифр в введеном с клавиатуры числе х кол-во…

Question

51

Цикл с постусловием. Подсчитать кол-во цифр в введеном с клавиатуры числе х кол-во троек. Составить блок схему ипрограмму

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

ответить

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

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

sergeda · Accepted Answer

97

sergeda

21 февраля 2023

var x, count: integer; begin write ('x='); readln (x); write ('Количество троек в числе ', x, ' — '); while x > 0 do begin if x mod 10=3 then count: =count+1; x: =x div 10; end; writeln (count); end.

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

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

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

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