39 символов включая знаки препинания и пробелы в итоге.
39*2=78
Ответ:
использовать Чертежник
алг
нач
цел й,ц
нц для й от 1 до 2
нц для ц от 1 до 4
опустить перо
сместиться на вектор (0,ц)
сместиться на вектор (ц,0)
сместиться на вектор (0,-ц)
сместиться на вектор (-ц,0)
поднять перо
сместиться на вектор (ц+1,0)
кц
сместиться в точку (0,-5)
кц
кон
Объяснение:
Смотри картинку
Begin
writeln(ord('Б')+ord('А')+ord('Й')+ord('Т'));
end.
Var b,a1,a2,S:integer;
Begin
readln(b); {вводим 2-ух значное число}
a1:=b div 10;
a2:=b mod 10;
S:=a1+a2;
if s mod 6=0 then writeln('Кратно') else writeln('не кратно');
readln;
end.