ForNext
Only Do What Only You Can Do
071. 文字列の配列
VBScript
JScript
Perl
更新日 : 2010.10.18
@cs = ("Turbo", "NA", "DOHC"); for (0..2) { printf("cs[%d] = \"%s\"\n", $_, $cs[$_]); }
L:\>perl lesson_09_071.pl cs[0] = "Turbo" cs[1] = "NA" cs[2] = "DOHC"
PHP
更新日 : 2010.11.03
<?php $cs = array("Turbo", "NA", "DOHC"); for ($i = 0; $i <= 2; $i++) { printf("cs[%d] = \"%s\"\n", $i, $cs[$i]); } ?>
L:\>php lesson_09_071.php cs[0] = "Turbo" cs[1] = "NA" cs[2] = "DOHC"
Python
更新日 : 2010.11.17
cs = ["Turbo", "NA", "DOHC"] for i in range(0, 3, 1): print "cs[%d] = \"%s\"" % (i, cs[i])
N:\>python lesson_09_071.py cs[0] = "Turbo" cs[1] = "NA" cs[2] = "DOHC"
Ruby
更新日 : 2010.11.01
cs = ["Turbo", "NA", "DOHC"] cs.each_with_index do |value, i| printf("cs[%d] = \"%s\"\n", i, value) end
L:\>ruby l:\lesson_09_071.rb cs[0] = "Turbo" cs[1] = "NA" cs[2] = "DOHC"
PowerShell
Scala
F#
C
更新日 : 2010.10.08
#include <stdio.h> int main(int argc, char* argv[]) { int i; char cs[][6] = {"Turbo", "NA", "DOHC"}; for (i = 0; i < 3; i++) printf("cs[%d] = \"%s\"\n", i, cs[i]); return 0; }
R:\>lesson071\Project1.exe cs[0] = "Turbo" cs[1] = "NA" cs[2] = "DOHC"
C++
C++Builder
VC++
C#
Java
Objective-C
D
VB
VB.NET
Delphi
更新日 : 2010.09.24
program Project1; {$APPTYPE CONSOLE} uses SysUtils; procedure main(); var cs: array[1..3] of String; i: Integer; begin cs[1] := 'Turbo'; cs[2] := 'NA'; cs[3] := 'DOHC'; for i := 1 to 3 do Writeln(Format('cs[%d] = ''%s''', [i, cs[i]])); end; begin main; end.
S:\>lesson071\Project1.exe cs[1] = 'Turbo' cs[2] = 'NA' cs[3] = 'DOHC'