profile
Опубликовано 5 лет назад по предмету Информатика от angel87

Cоставить программу умножения первой цифры пятизначного числа на 10.

  1. Ответ
    Ответ дан Аккаунт удален

    если на паскаль, то:

    program fgh;

    var x,n,p:integer;

    begin

    writeln ('Введите пятизначное число');

    readln (x);

    n:= x div 10000;

    p:= n*10;

    writeln ('результат - ', p);

    end.