В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
ZigFinde
ZigFinde
04.02.2021 21:39 •  Информатика

Жолда жүру ережесі кімдерге арналған?
Жауап нұсқалары 1. Жаяу жүргінші. 2. Жүргізуші. 3.Жол жиегімен. 4. Жүргіншілер жолы. 5. Көлік. 6. Жолда жүру ережесі. 7. Көліктік жолы. 8. Жаяу Жүргіншілер өткелі. 9. Бағдарламасының. 10.Жол реттеуші.​

Показать ответ
Ответ:
12345TEREX
12345TEREX
25.06.2020 20:53

ответ:

на форму поставил компонент 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;

end;

0,0(0 оценок)
Ответ:
geneu
geneu
21.02.2020 07:23

ответ: попробуй  

объяснение:

void __fastcall tform1: : button1click(tobject *sender)

{

  int count = 0;

  tstringlist *list = new tstringlist; // г±г®г§г¤г*гґг¬ г±гїгёг±г®гє

  list-> loadfromfile("f: \\гљгіг«гјгігёг*\\info.txt");

  memo1-> text =   list-> text;

  list-> delimitedtext = memo1-> text;

  memo2-> text = list-> delimitedtext;

  for (int i=0; i < list-> count; i++)

  {

    if ( list-> strings[i].length() < = 4 )

    {

      count++;

    }

  }

  label1-> caption = inttostr(count);

  delete list;

  list = null;

}

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота