Есть ответ 👍

Начертить звезду в программы '"robot"

106
111
Посмотреть ответы 2

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


Использовать чертежник алг звезды нач нц 1 раз  поднять перо  сместиться на вектор (8,0)  опустить перо  сместиться на вектор (3,6)  сместиться на вектор (3,-6)  сместиться на вектор (-6,4)  сместиться на вектор (6,0)  сместиться на вектор (-6,-4)  поднять перо  кц

var

  a, b, buf: real;

begin

  write('a = '); readln(a);

  write('b = '); readln(b);

  buf : = a;

  a : = b;

  b : = buf;

  writeln('a = ', a);

  writeln('b = ', b);

end.

 

 

// без буферной переменной

var

  a, b: real;

begin

  write('a = '); readln(a);

  write('b = '); readln(b);

  a : = a + b;

  b : = a - b;

  a : = a - b;

  writeln('a = ', a);

  writeln('b = ', b);

end.

 

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