Правильно или нет, подскажите как program ex; var a,b,c:integer; begin readln (a); b:=a mod 10; c:=a div 100; a:=b+c; writeln (a); end.
a:=b+c; writeln (a); end.
Ответы:
21-11-2018 15:42
Program vav;var a,b,c,x,s:integer;begin read(a);x:=a;s:=0;while x<>0 do begin s:=s+(x mod 10); x:=x mod 10 end;write(s);end.
Также наши пользователи интересуются:
Напиши недостающие слова в единственном и множественном числеЖуки плавунцы впадают спячку ?
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Правильно или нет, подскажите как program ex; var a,b,c:integer; begin readln (a); b:=a mod 10; c:=a div 100;» от пользователя Вячеслав Стрельников в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!