Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
карандаш - графит; ископаемое, состоящее из угля и желез это же вещество, вставленное пруточками в деревянную трубочку, для черченья и рисованья.
var
s: string;
i: longint;
begin
readln(s);
for i: =1 to length(s) div 2 do write(s[i]);
end.
картинка длжна быть в папке с программой и быть в формате bmp
usesgraphabc;
varn: string; b: picture; s: integer;
beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.
s: = str(number);
for : = 1 to length(s) div 2 do
if s[i] < > s[length(s) - i + 1] then writeln("не палиндром")ж
Популярные вопросы