Алгоритми і програми з розгалуженнями, Детальна інформація
Алгоритми і програми з розгалуженнями
end.
або інший приклад:
case k of
1; cina:=22,
2,3: cina:=35;
4: cina:=50;
else cina:=97
end;
3. Складена команда.
Складена команда – це команда, в якій декілька команд об’єднано в одну за допомогою службових слів begin та end:
Задача. Скласти програму, яка дає довідку про назву столиці (St) та кількість населення (nas, у мільйонах) деякої країни (kr) з такого переліку: Угорщина, Італія, Україна.
program Countries;
var kr, st: string; nas: integer;
begin
write (‘Введіть назву країни’);
readln (kr);
if kr = ‘Угорщина’ then
begin
st:= ‘Будапешт’;
nas:=11
end;
if kr = ‘Італія’ then
begin
st:= ‘Рим’;
nas:=60
end;
if kr = ‘Україна’ then
began
st:= ‘Київ’;
nas:= 48
або інший приклад:
case k of
1; cina:=22,
2,3: cina:=35;
4: cina:=50;
else cina:=97
end;
3. Складена команда.
Складена команда – це команда, в якій декілька команд об’єднано в одну за допомогою службових слів begin та end:
Задача. Скласти програму, яка дає довідку про назву столиці (St) та кількість населення (nas, у мільйонах) деякої країни (kr) з такого переліку: Угорщина, Італія, Україна.
program Countries;
var kr, st: string; nas: integer;
begin
write (‘Введіть назву країни’);
readln (kr);
if kr = ‘Угорщина’ then
begin
st:= ‘Будапешт’;
nas:=11
end;
if kr = ‘Італія’ then
begin
st:= ‘Рим’;
nas:=60
end;
if kr = ‘Україна’ then
began
st:= ‘Київ’;
nas:= 48
The online video editor trusted by teams to make professional video in
minutes
© Referats, Inc · All rights reserved 2021