1. Информатика
  2. Дано слово магазин .при строковых

Дано слово 'магазин'.при строковых функций написать программу, выводящую это же слово, но по вертикали.

LeylaAllesgerova LeylaAllesgerova    2   23.08.2019 23:30    0

Ответы
paolo99 paolo99  05.10.2020 15:29
Program n1;
var s: string;
i: integer;
begin
s:='Магазин';
for i:=1 to length(s) do writeln(s[i]);
end.
ПОКАЗАТЬ ОТВЕТЫ
Помидоркин001 Помидоркин001  05.10.2020 15:29
// PascalABC.NET 3.2, сборка 1387 от 20.02.2017

begin 'Магазин'.Println(NewLine) end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
megan99 megan99  21.09.2019 15:10
1. откройте текстовый файл природа.rtf из папки заготовки: 2. выберите в тексте информацию о том, какие семейства входят в отряд хищных. лишнюю информацию удалите....
WorkoutEdik WorkoutEdik  21.09.2019 15:10
Отметьте условия, записанные правильно на языке паскаль 1. а _0 (больше или равно) 2. х 0 or y 0 3. c=/10 (не равно) 4. (x 10) and (y 20) 5. x, y 0 6. x 0, y 0 7.d...
Shrhfhd Shrhfhd  21.09.2019 15:10
Записать программу массив,состоящий из 30-ти чисел. вычислить сумму отрицательная чисел....
avdzhrr avdzhrr  26.05.2019 19:20
1) в детском саду 52 ребенка.каждый из них любит конфеты или мороженое .половина детей любят конфеты, а 20 человек-конфеты и мороженое.сколько детей любит мороженое...
nara01072003 nara01072003  24.08.2019 06:10
Какая последовательность символов не может служить именем на языке паскаль? _mas mas1 массив1 123h h123 h 123...
S1mple11111 S1mple11111  24.08.2019 06:20
3с. заполнить ячейки a1: a100 первой строки (лист2) 1. символом “*” так, чтобы в первой строке не было пустого места; 2. дробными числами, начиная с 0.1 с шагом 0,...
Незнайка1111ункркр Незнайка1111ункркр  24.08.2019 06:20
Попытайтесь расшифровать сообщение, закодированное шифром цезаря с неизвестным сдвигом: «хшжнпут фкхкойкт». 20б...
KOSHAPLAY27082007 KOSHAPLAY27082007  24.08.2019 06:20
Составить и написпть алгоритм 4 класс...
holil070707325 holil070707325  24.08.2019 06:20
Сколько школьных учебников размером в 256 кбайт можно разместить на компакт-диске ёмкостью 700 мб?...
manovskidominik manovskidominik  24.08.2019 06:30
Составьте программу к следующей : ученик начал решать данного урока программирования, когда электронные часы показывали h1 часов и min1 минут, а закончил, когда было...

Популярные вопросы