Складіть програму, за до якої зі слова s1 можна отримати слово s2 слово s1 слово s2
метро
спортсмен

до іть будь ласка)

Question

Информатика: Складіть програму, за до якої зі слова s1 можна отримати слово s2 слово s1 слово s2 метроспортсмендо іть будь ласка)​

NuriEynullaeva · Answer

ответ:

на форму поставил компонент memo

в edit1 и edit2 вводим значения строк и столбцов

для цикла for i: = for j: =

на кнопке следующий код

объяснение:

procedure tform1.button1click(sender: tobject);

var i,j: integer; s: string;

begin

a: = strtoint(edit1.text);

b: = strtoint(edit2.text);

for i: = 1 to a do begin

s: = '';

for j: = 1 to b do

s: = s+' '+inttostr(i*j);

memo1.lines[i-1]: = s;

end;

Складіть програму, за до якої зі слова s1 можна отримати слово s2 слово s1 слово s2 метроспортсмендо іть будь ласка)​