Задать вопрос
6 сентября, 03:57

Написать программу лёгкую в поскаль со всеми значениями

+2
Ответы (1)
  1. 6 сентября, 05:09
    0
    Program cisla;

    uses crt;

    var m, n:longint;

    k:integer;

    begin;

    clrscr;

    writeln ('введите число=') ;

    readln (n) ;

    m:=n;

    k:=0;

    while m0 do begin

    k:=k+1;

    m:=m div 10;

    end;

    writeln ('в числе = ', k,' цифр') ;

    repeat until keypressed;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Написать программу лёгкую в поскаль со всеми значениями ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы