Предмет: Информатика,
автор: smile0071
дано предложение-строка. подсчитать количество слов, начинающихся с буквы 'а' написать программу на паскале
Ответы
Автор ответа:
0
var c,a,n,i:longint;
begin
read(n);
read(a);
c:=a;
for i:=2 to n do
begin
read(a);
c:=c+a;
end;
write(c);
end.
Автор ответа:
0
Это что за, простите, фигня?
Интересные вопросы
Предмет: Алгебра,
автор: DenusMiscevic
Предмет: Математика,
автор: homenkokarina542
Предмет: Английский язык,
автор: dimamilohin01
Предмет: Литература,
автор: marinaterentev
Предмет: Математика,
автор: asiasargs