Регистрация
АНДРЕЙ22855555
25.06.2021 16:57
Информатика
Есть ответ 👍

Из чисел от 100 до 999 вывести те, сумма цифр которых числу n, введенному с клавиатуры.

267
491
Посмотреть ответы 2

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

Egolaspro
Egolaspro
4,8(3 оценок)

program n1; uses crt; var a,b,c,k,n,i: integer; beginclrscr; writeln('vvedite n'); readln(n); for i: =100 to 999 do begina: =i div 100; b: =i mod 100 div 10; c: =i mod 10; if a+b+c=n then begin write(i: 4); k: =k+1; end; end; if k=0 then writeln('takih chisel net'); readlnend.

Aislu111
Aislu111
4,4(60 оценок)
Сданной программы на паскале преобразуешь коды в символы (или  таблиц). ответ : paintbrush. var a: char; b: integer; begin writeln ('введите код символа'); read(b); // чтение кода a: =chr(b); // преобразует код в символ write ('символ - ',a); end.

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