AS
Я использую fpc из консоли
в "блокноте" код пишешь?
почему для PascalABC ты используешь IDE, а для FPC - нет?
почему для PascalABC ты используешь IDE, а для FPC - нет?
Size: a a a
2020 August 19
AS
и хочу посмотреть как работает write
смотри тогда его исходники ))
как их найти? есть штуки три варианта ))
как их найти? есть штуки три варианта ))
АВ
Ты ещё забыл что там реализации этого под n платформ и все по инкам распиханы😂
O
смотри тогда его исходники ))
как их найти? есть штуки три варианта ))
как их найти? есть штуки три варианта ))
я не нашел ни одного варианта
O
в "блокноте" код пишешь?
почему для PascalABC ты используешь IDE, а для FPC - нет?
почему для PascalABC ты используешь IDE, а для FPC - нет?
Я не использую вообще иде. В виме пишу
O
про абц это был пример, чтоб обьяснить что я хочу
GB
Я не использую вообще иде. В виме пишу
значит и про греп знать должен. ищешь по исходникам FPC этот самый write. хотя по мне так лучше доки смотреть
AS
Я не использую вообще иде. В виме пишу
👍
но тогда , действительно, странно слышать про "как найти исходники?" ))))
но тогда , действительно, странно слышать про "как найти исходники?" ))))
O
👍
но тогда , действительно, странно слышать про "как найти исходники?" ))))
но тогда , действительно, странно слышать про "как найти исходники?" ))))
Так это же не показатель
AS
Так это же не показатель
Ну, уж если ты нашёл как выйти из вима.... 😁
O
Ну, уж если ты нашёл как выйти из вима.... 😁
Напечатать диамант вложенными цикламы в паскале посложнее будет. За 3 дня попыток просто забил на это
АВ
А какая разница что выводить то в цикле?
АВ
Ну почитайте доку фпц
АВ
Хоть фором, хоть вайлом, хоть на ассемблере
АВ
В котором так то вообще циклов нет
O
А какая разница что выводить то в цикле?
потому что для меня это сложный алгоритм
O
сделать во-первых ввод высоты диаманта нужно. А потом печатать отдельно каждую из сторон этого ромба
O
не ну я могу просто напечатать каждую строку отдельным writeln'ом, но вот до чего я должен додуматься в идеале:
program diamond;
var
n, k, h, i: integer;
begin
repeat
write('Enter the diamond''s height (postitive odd): ');
readln(h)
until (h > 0) and (h mod 2 = 1);
n := h div 2;
for k := 1 to n + 1 do
begin
for i := 1 to n + 1 - k do
write (' ');
write('*');
if k > 1 then
begin
for i := 1 to 2*k -3 do
write(' ');
write('*')
end;
writeln
end;
for k := n downto 1 do
begin
for i := 1 to n + 1 - k do
write(' ');
write('*');
if k > 1 then
begin
for i := 1 to 2*k - 3 do
write(' ');
write('*');
end;
writeln
end
end.
O
и что-то у меня до такого не получается додумываться
AK
for i := 1 to 2*k -3 do
write(' ');
write('*')
подразумевается, что звездочка выводится один раз?