46

Составить прогр. На языке паскаль для определения суммы цыфр в числе…

alexxander 05 апреля 2023

Составить прогр. На языке паскаль для определения суммы цыфр в числе, введенного с клавиатуры. Сост. Програму на языке паскаль для нахождения суммы всехчисел на отрезке [1; 10] Пожалуйста очень надо.

категория: информатика

43

uses crt; var a,x: integer; i,s: integer; beginclrscr; writeln ('Vvedite chislo'); readln (a); x: =a; s: =0; while (x<>0) dobegins: =s+(x mod 10); x: =x div 10; end; writeln ('Summa cifr chisla ',a,'=', s); readln; end. Сумма чисел от 1 до 10uses crt; var x,i: integer; beginclrscr; for i: =1 to 10 dox: =x+i; writeln ('Summa chisel=', x); readln; end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...