0 / 0 / 0
Регистрация: 11.12.2013
Сообщений: 24

Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения

25.03.2014, 20:07. Показов 6656. Ответов 4
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения.
он не просит ввести дату рождения и не выводит список учеников с фамилией начинающегося на В

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Var
A:integer;
S:array[1..32767] of string;
B,C:string;
Begin
repeat
WriteLn('Введи фамилию ученика.');
ReadLn(C);
If (C[1]='В') then Begin
A+=1;
S[A]+=C+' ';
WriteLn('Введи дату его рождения.');
ReadLn(C);
S[A]+=C;
End;
WriteLn('Это все ученики?');
ReadLn(B);
Until not((B<>'Да')and(B<>'да')and(B<>'ДА'));
For var i:= 1 to A do
Begin
WriteLn(S[i]);
End;
End.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
25.03.2014, 20:07
Ответы с готовыми решениями:

Распечатать список студентов, фамилии которых начинаются на букву В, с указанием даты их рождения
Распечатать список студентов, фамилии которых начинаются на букву В, с указанием даты их рождения.

Распечатать список учеников, фамилии которых начинаются на букву А
Здраствуйте, я у вас новенькая, но нуждаюсь очень в вашей помощи! Немогу решить задачки по паскалю, очень трудно даеться ОАП вот...

Распечатать список учеников, фамилии которых начинаются на букву В
Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения.

4
16 / 16 / 12
Регистрация: 22.05.2013
Сообщений: 40
25.03.2014, 20:15
Может конечно я и не прав, но вроде в Паскале не такого S[A]+=C, в Паскале это записывается S[A]=S[A]+C
0
0 / 0 / 0
Регистрация: 11.12.2013
Сообщений: 24
25.03.2014, 20:21  [ТС]
а толку мало все равно не понимаю где что надо исправить что бы программа работала корректно
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7805 / 4627 / 2832
Регистрация: 22.11.2013
Сообщений: 13,146
Записей в блоге: 1
25.03.2014, 23:57
Что-то вроде:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  a, i: integer;
  s: array[1..255] of string[40];
  c: string;
begin
  repeat
    Write('Фамилия и дата рождения ученика: '); ReadLn(c);
    if c='' then break; { выход по пустой строке }
    if c[1]='В' then begin
      inc(a); s[a]:=c;
    end;
  until false;
  for i:=1 to a do WriteLn(s[i]);
end.
0
0 / 0 / 0
Регистрация: 07.02.2020
Сообщений: 5
07.02.2020, 15:27
А на C# такого нету?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
07.02.2020, 15:27
Помогаю со студенческими работами здесь

Распечатать список студентов, фамилии которых начинаются с буквы Б, и их даты рождения
Распечатать список студентов, фамилии которых начинаются с буквы Б, и их даты рождения. I: INTEGER; begin for I := 1 TO N DO ...

Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения
Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения.

Распечатать список учеников, фамилии которых начинаются на букву X
Распечатать список учеников, фамилии которых начинаются на букву X. Кто из этого списка имеют один и тот же цвет глаз и волос? P.S....

Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения
Не выводит фамилии на букву В, что не так подскажите пожалуйста. program zapisi; Uses crt; type k=record ...

Распечатать список учеников класса, фамилии которых начинаются на букву Д, с указанием даты рождения
Распечатать список учеников класса, фамилии которых начинаются на букву Д, с указанием даты рождения. Также указать их количество.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

Новые блоги и статьи
Интеграция Hangfire с RabbitMQ в проектах C#.NET
stackOverflow 18.04.2025
Разработка современных . NET-приложений часто требует выполнения задач "за кулисами". Это может быть отправка email-уведомлений, генерация отчётов, обработка загруженных файлов или синхронизация. . .
Построение эффективных запросов в микросервисной архитектуре: Стратегии и практики
ArchitectMsa 18.04.2025
Микросервисная архитектура принесла с собой много преимуществ — возможность независимого масштабирования сервисов, технологическую гибкость и четкое разграничение ответственности. Но как часто бывает. . .
Префабы в Unity: Использование, хранение, управление
GameUnited 18.04.2025
Префабы — один из краеугольных элементов разработки игр в Unity, представляющий собой шаблоны объектов, которые можно многократно использовать в различных сценах. Они позволяют создавать составные. . .
RabbitMQ как шина данных в интеграционных решениях на C# (с MassTransit)
stackOverflow 18.04.2025
Современный бизнес опирается на множество специализированных программных систем, каждая из которых заточена под решение конкретных задач. CRM управляет отношениями с клиентами, ERP контролирует. . .
Типы в TypeScript
run.dev 18.04.2025
TypeScript представляет собой мощное расширение JavaScript, которое добавляет статическую типизацию в этот динамический язык. В JavaScript, где переменная может свободно менять тип в процессе. . .
Погружение в Kafka: Концепции и примеры на C# с ASP.NET Core
stackOverflow 18.04.2025
Apache Kafka изменила подход к обработке данных в распределенных системах. Эта платформа потоковой передачи данных выходит далеко за рамки обычной шины сообщений, предлагая мощные возможности,. . .
Коммуникация в реальном времени с SignalR в C# на примере создания чата
UnmanagedCoder 17.04.2025
Современный веб стремительно эволюционирует от статичных страниц к динамичным приложениям, где пользователи ожидают мгновенной реакции на свои действия. Представим, что вы отправляете сообщение. . .
Реализация CQRS с MediatR на C# .NET
stackOverflow 17.04.2025
Современная разработка программного обеспечения постоянно ищет пути повышения эффективности организации кода. Архитектурные паттерны появляются, эволюционируют, и те, что проявляют свою. . .
Verilog и интеллектуальная собственность - "глазами" обученной LM модели.
Hrethgir 17.04.2025
В сети встречаются участники, заявляющие что код на Verilog ни о чём не говорит. Но вот патентная практика на самом деле показывает обратное ими утверждаемому. То-есть код на Verilog включают в. . .
Свап-файл дополнительно к разделу (если вдруг не хватает или не создан)
jigi33 17.04.2025
ПОДКЛЮЧЕНИЕ ДОПОЛНИТЕЛЬНОГО SWAP ПРОСТРАНСТВА, Т. О. , РАСШИРЕНИЕ ЕГО РАЗМЕРА В Linux можно использовать как раздел подкачки (swap), так и файл подкачки (swap-файл). Чтобы создать swap-файл вместо. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru