Регистрация
крошкакартошка14
27.04.2023 07:19
Информатика
Есть ответ 👍

Даны три натуральных числа.выяснить в каком из них сумма цифр больше.(определить функцию для расчёта количества цифр натурального )

249
368
Посмотреть ответы 2

Ответы на вопрос:

акылбек5
акылбек5
4,5(95 оценок)

var x1,x2,x3,s1,s2,s3: integer;

function sumofnumber(num: integer): integer;

var s: string;

i: integer;

begin

  s: =str(num);

  for i: = 1 to length(s) do

        sumofnumber: = sumofnumber+int(s[i]);

end;

 

begin

  read(x1,x2,x3);

  s1: =sumofnumber(x1);

  s2: =sumofnumber(x2);

  s3: =sumofnumber(x3);

 

  if s1> s2 and s1> s3 then writeln(x1);

  if s2> s1 and s2> s3 then writeln(x2);

  if s3> s2 and s3> s1 then writeln(x3);

end.

 

в правильности написания функции типов не уверенна.

ДианаИванова11
ДианаИванова11
4,8(55 оценок)

думаю буквы не сложно будет расположить

Популярно: Информатика