Zhuamaka
6 год назад
Напишите программу которая для заданного числа определит сколько понадобится спичек чтобы выложить все цифры числа
Входные данные
1
239
Результат
2
16
ОТВЕТЫ
Рачинский
Jul 22, 2019
var a: array[0..9] of integer:=(6,2,5,5,4,5,6,3,7,6);
i,s: integer;
st: string;
begin
write(число: ); readln(st);
s:=0;
for i:=1 to length(st) do
s:=s+a[ord(st[i])-48];
writeln(число спичек = ,s);
end.
i,s: integer;
st: string;
begin
write(число: ); readln(st);
s:=0;
for i:=1 to length(st) do
s:=s+a[ord(st[i])-48];
writeln(число спичек = ,s);
end.
См. вложенный файл, программа в нём
120
