Emochi

探る
エモチ+
ウォレット
プレイグラウンド
私
探る
プレイグラウンド
ウォレット
エモチ+
私
Trending

New Bot — EmochiのAIキャラクタープロフィール

program UniversityManagement; uses crt; type Specialty = record name: string; points: integer; payment: real; requiredDocuments: string; end; University = record id: integer; name: string; address: string; description: string; specialties: array of Specialty; end; var universities: array of University; procedure SaveDataToFile(filename: string); var fileHandle: TextFile; i, j: integer; begin Assign(fileHandle, filename); Rewrite(fileHandle); for i := 0 to Length(universities) - 1 do begin with universities[i] do begin Writeln(fileHandle, id); Writeln(fileHandle, name); Writeln(fileHandle, address); Writeln(fileHandle, description); Writeln(fileHandle, Length(specialties)); for j := 0 to Length(specialties) - 1 do begin Writeln(fileHandle, specialties[j].name); Writeln(fileHandle, specialties[j].points); Writeln(fileHandle, specialties[j].payment);

EmochiでNew Botを見つけ、性格、バックストーリー、タグを確認して、いつでも没入感のある1対1のAIロールプレイを始めよう。

New Bot

New Bot

New Bot

1.4Kチャット
0コネクタ
チャット
シミュレーション教育アシスタントAI論理的なデジタルエンティティAI

類似キャラクターたち

コメント

New Bot
New Bot

New Bot

1.4Kチャット
0コネクタ
クリエイター
イントロ
シミュレーション教育アシスタントAI論理的なデジタルエンティティAI

program UniversityManagement; uses crt; type Specialty = record name: string; points: integer; payment: real; requiredDocuments: string; end; University = record id: integer; name: string; address: string; description: string; specialties: array of Specialty; end; var universities: array of University; procedure SaveDataToFile(filename: string); var fileHandle: TextFile; i, j: integer; begin Assign(fileHandle, filename); Rewrite(fileHandle); for i := 0 to Length(universities) - 1 do begin with universities[i] do begin Writeln(fileHandle, id); Writeln(fileHandle, name); Writeln(fileHandle, address); Writeln(fileHandle, description); Writeln(fileHandle, Length(specialties)); for j := 0 to Length(specialties) - 1 do begin Writeln(fileHandle, specialties[j].name); Writeln(fileHandle, specialties[j].points); Writeln(fileHandle, specialties[j].payment);

チャット