tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу,которая формирует
Составить программу,которая формирует символьную строку,состоящую из (n)
AndrewLoveRem
3 19.09.2019 20:20
1
Ответы
мыпоммрт
08.10.2020 02:57
Pascal:
uses crt;
var s: String;
n, i: Integer;
begin
readln(n);
for i := 1 to n do
s[i] := s[i] + '.';
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
sataevaelsa
08.10.2020 02:57
Var
s: string;
n: integer;
Begin
Readln(n);
s:=s;
For i:integer:=1 to n do s:=s+'.';
Writeln(s);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
zhenyaermakov
23.11.2020 14:52
Вход и выход для системы дерево: Корень и ветка, вода и углекислый газ, лист и ствол,свет и минеральные вещества, ...
Марина2808
23.11.2020 14:53
составить блок-схему: Дан вектор Y(M). Все компоненты вектора, большие 7 увеличить на 2. Подсчитать количество таких замен....
отличник22878
29.09.2019 09:10
Eaa(16 ричная система) +c 1 7(16ричная система)...
cimuzoro
29.09.2019 09:10
10100011(двоичная сист.) - 1100101(двоичная сист.)...
Леночка177
29.09.2019 09:10
Оперативная система логотипом которой является пингвин? ?...
svetlana196420
29.09.2019 09:10
6246( в восьмеричной сист.) - 1656( в восьмеричной)...
Luna669
29.09.2019 09:10
1.сколько мегабайтов и килобайтов составляет сообщение,содержащее 1572864 байта? 2.сколько килобайтов составляет сообщение,содержащее 20480 бит? 3.сколько мегабайтов...
moldirkenesova
29.12.2020 09:33
Оглавление – Назначение 2. Вставить название – Назначение 3. Вставить сноску – Назначение...
VeRa2KoToVa1
29.12.2020 09:32
Кегл-кольцо. Урок 2 Определить.оРобот бесконечендвигаться впереддаетРобот красныйпока ты не мечтаешьвпередможет ходитьоРоботот объекта 50более смпрочьдвигаться впереддает...
Marka9696
29.08.2019 09:30
Найти максимальное значение из 10 введённых чисел на паскале...
Популярные вопросы
Найдите координаты точек пересечения с осью oy прямых, являющихся...
2
1. является ли число 3 корнем уравнения х2 – 2х – 5 = 0?...
2
Параметр какого типа будет внесен в реестр строкой param =hex: be,00,00,00...
1
Концы отрезка ab не пересекающего плоскость удалены от неё на расстояния...
1
Нужно ли проверять и как проверить слово широкий...
2
Вычеслите количество вещества углекислого газа массой 110 граммов...
2
Впериод правления какого царя кушанское царство достигло расцвета:...
3
Может ли вулкан начать извергаться в моем дворе? ответить 30...
1
1)вычислите количество вещества углекислого газа массой 110г 2)найдите...
1
Описать героя сказки о серебряном копытце по плану 1 где живёт герой...
3
uses crt;
var s: String;
n, i: Integer;
begin
readln(n);
for i := 1 to n do
s[i] := s[i] + '.';
writeln(s);
end.
s: string;
n: integer;
Begin
Readln(n);
s:=s;
For i:integer:=1 to n do s:=s+'.';
Writeln(s);
End.