Дано натуральное число. верно ли, что сумма его цифр больше 10? paskal

паскаль пишется как pascal.

var

  a, sum : integer;

begin

  read (a);

  sum : = 0;

  while (sum < = 10) and (a > 0) do

  begin

    sum : = sum + a mod 10;

    a : = a div 10;

  end;

  if sum > 10 then write ('yes') else write ('no');

end.

в си:

# include < stdio.h> # include < conio.h> void main ()  {

    clrscr();

    int x,y,c,k;

    printf("vvedite x \n");  

    scanf("%d",& x);

    printf("vvedite y \n");  

    scanf("%d",& y);

    printf("vvedite c \n");  

    scanf("%d",& c);

    k=x+(y/(2*c));

    printf("otvet: %d \n",k);

    getch();

  }

пусть х(мин)-потратела времени на выполнение д/з вчера

имеем уравнение:

х+х-10=60

2х=60+10

2х=70

х=70/2

х=35

35(мин)-потратела времени на выполнение д/з вчера