Вопрос по информатике:
Прочитать с экрана 30 имен, сосчитать сколько среди них имен Петя .
Замечание-использовать только 3 переменных.
abc
a-текущ имя(строковый)
b-переменная(кол-во имен Петя)
с-переменная(цель-сколько всего имен)
Пожаловаться
- 14.07.2015 00:26
- Информатика
- remove_red_eye 13087
- thumb_up 33
Ответы и объяснения 1
Решение на паскале:
var
a: string;
b, c: byte;
begin
b := 0;
c := 0;
for c := 1 to 30 do
begin
readln(a);
if a = 'Петя' then b := b + 1;
end;
write(b);
end.
var
a: string;
b, c: byte;
begin
b := 0;
c := 0;
for c := 1 to 30 do
begin
readln(a);
if a = 'Петя' then b := b + 1;
end;
write(b);
end.
Пожаловаться
- 15.07.2015 21:54
- thumb_up 6
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы