Ответы на вопрос:
var
a,b:integer;
begin
a:=0;
b:=0;
//Вывод через while
while a<>10 do
begin
inc(a);
write(a,' ');
end;
Популярно: Алгебра
-
Постройте график функции хоть любой, со всеми пояснениями ...
is835172Alexandr20.12.2022 09:32 -
Вычисли меньшую сторону и площадь прямоугольника, если его большая сторона...
ress33417.03.2023 14:26 -
Реши графически систему уравнений: y = x, y = 2 – х ОЧЕНЬ НАДО!!!...
2073611.04.2020 05:02 -
Найдите производную функции f(x) в точке x0. a)f(x)=3x^2+5x,x0=2; б)f(x)=x^4-2x^4+x+4,x0=1;...
bluegirl04.09.2021 02:34 -
Как понять значение x в линейной функции?...
egoraga14214.09.2022 15:16 -
ТЕМА Разложение на множители суммы и разности кубов а^4-b^6= 0.01c^2-d^8=...
aruka99615.05.2023 05:24 -
Решите с системы линейных уравнений четвертое задание второй пример...
grmej11.01.2020 20:05 -
Катер шел 3 ч по течения реки и 2 часа против тячения реки и прошёл путь...
wwwnikitafakh31.10.2020 02:57 -
Значение суммы длин радиусов двух кругов равна 14 см, а значение разности...
andreysemenyuk29.05.2020 16:33 -
{3m+2n=0.5 {2m+5n=4 решить систему ур-ия методом сложения!...
kindgirl99927.03.2021 05:13