bochinskaya06
07.04.2022 15:41

1) напечатайте таблицу кубов чисел: -10, -8, -6, 10. 2)определите результат выполнения программы (без компьютера) begin s: =0; x: =10; repeat s: =s+x; x: =x+10; untill x> 12; writein('s=',s); writein('x=',s); end.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Vanpal03
01.10.2020 13:05
1)
uses crt;
var a:integer;
begin
     for a:=-10 to 10 do
     writeln('a=',a,' ',a*a*a:6);
end.
---
2) 10
    10
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота