Ответ: программа выдаст 150, если в ней исправить ошибки. Текст исправленной программы представлен ниже:
var
n, s: integer;
begin
N := 4;
S := 0;
While n<= 13 do begin
S := s +15;
N := n+1;
End;
Write (s);
end;
использовать Робот
алг
нач
нц 8 раз
вправо
кц
закрасить
нц 1 раз
вниз
нц 2 раз
влево
вверх
нц 1 раз вправо
нц 4 раз
кон
объекты-процессы:
1)запуск ракеты
7)движение планеты
6)чтение книги
Процесы:
2)прогулка
3)закат
5)листопад
8)пение
9)рыбалка