- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
program square;
var sep, input: string;
i, j, n, m : integer;
begin
write('sep:');
readln(sep);
write('str:');
readln(input);
for i:=1 to length(input) do write(input[i], ' ');
writeln();
for i:=2 to length(input)-1 do begin
write(input[i]);
for j:=1 to length(input)*2-3 do write (sep);
writeln(input[length(input) - i + 1]);
end;
for i:=0 to length(input)-1 do
write(input[length(input)-i], ' ');
end.
Написала на скучной лекции программку на телефоне, чтобы распечатывать
gostinho 28.03.2021 16:07 # 0
KoWe4Ka_l7porpaMMep 28.03.2021 16:17 # 0
PolinaAksenova 28.03.2021 16:42 # +1
bormand 28.03.2021 16:50 # +1
gostinho 28.03.2021 16:13 # +3
https://ideone.com/zGXTwC
DypHuu_niBEHb 01.04.2021 21:16 # 0
ObeseYoungPidor 17.04.2022 20:02 # 0
guest6 17.04.2022 20:45 # 0
вроде сейчас другие языки и не используются особо
Desktop 14.07.2021 16:43 # +2
ObeseYoungPidor 17.04.2022 18:53 # 0
KaKou-To_xyu 17.04.2022 19:00 # 0
ObeseYoungPidor 17.04.2022 20:01 # 0
guest6 17.04.2022 20:46 # 0
Stallman 01.04.2021 18:37 # +3
То есть я не могу скопипастить это в свой пипиетарный ынтерпрайз проект? Не нужно!
bormand 01.04.2021 21:13 # +3
JloJle4Ka 01.04.2021 21:14 # +2
DypHuu_niBEHb 01.04.2021 21:23 # +1
BelCodeMonkey 10.04.2021 21:59 # +1