С клавиатуры вводится...

Тема в разделе "Информатика", создана пользователем Tanek, 1 фев 2010.

  1. Tanek

    Tanek New Member

    С клавиатуры вводится двузначное число a. Найти сумму его цифр.
     
    Tanek, 1 фев 2010
    #1
  2. -Siger-

    -Siger- New Member

    var a,a1,a2,sum:integer;
    begin
    readln(a);
    sum:=0;
    a1:=a mod 10;
    a2:=a div 10;
    sum:=a1+a2;
    writeln(sum);
    end. 
     
     
     
    -Siger-, 1 фев 2010
    #2

Поделиться этой страницей

Наша группа