Вводиться натуральное число n вывести за числом n еще одно такое же.решать через while. язык паскаль. пример , ввожу число n 999 оператор врайтлайн выводит 999999.
165
317
Ответы на вопрос:
Var n, i: integer; begin i : = 0; readln(n); while i < 2 do begin write(n); i : = i + 1; end; end.
Популярно: Информатика
-
Найти n! (n! =1*2*3*4* *n) число n запросить с клавиатуры...
МурррKsKs19.12.2020 06:41 -
Uses crt; var a, b, c: longint; begin for c: =10 to 10000000 do begin...
S1nneR6707.10.2021 17:22 -
Написать программу для вычисления объема куба по введённой длине ребра....
denvolk0023.05.2020 20:43 -
Составьте программу к определите является ли введеное число двузначным...
Семён322824.11.2020 07:33 -
Нужно, ! написать программу в паскале 1) начав собирать запасы на зиму,...
JULIYAc29.05.2021 10:59 -
С) 2 класс обведите синим два слова с одинаковым мешком букв: 1) мандарин...
SpiritAlice29.10.2020 20:32 -
Решить в free pascal. необходимо написать текст и алгоритм (схему) программы....
Юся180922.02.2020 02:23 -
Подсчитать количество отрицательных чисел из 10, введенных с клавиатуры...
ШимериШайн14.01.2020 00:21 -
Переведите число 13 из десятичной системы счисления в двоичную систему...
polinapolina134120.10.2020 00:23 -
Написать программу которая выводит на экран значений функции у=|х|....
dem0N129.06.2022 10:20