Есть ответ 👍

Составить ТОЛЬКО форму ГСА

229
397
Посмотреть ответы 1

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


program n1;

var a,c1,c2,c3: integer;

begin

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

  read(a);

  c1: =a mod 10;

  c2: =(a div 10) mod 10;

  c3: =(a div 100) mod 10;

  writeln('кол-во сотен = ',c3);

  writeln('кол-во десятков = ',c2);

  writeln('кол-во единиц = ',c1);

end.

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