Направо; повернуться на 90 градусов вправо налево; повернуться на 90 градусов влево кругом; развернуться кругом (на 180 градусов) вперед ( n ); перейти на n клеток вперед назад ( n ); перейти на n клеток назад
Спасибо
Ответ дал: Гость
решение на языке pascal
program pr;
var n,a,b,c, sum: integer;
begin
readln (n);
a: =n div 100;
b: =n mod 100 div 10
c: =n mod 10
sum: =a+b+c;
if sum mod 2 = 0 then writeln ('сумма цифр четная') else writeln('сумма цифр четная');
Популярные вопросы