Ответы Mail.ru
Программирование
Android
C/C++
C#
iOS
Java
JavaScript
jQuery
SQL
Perl
PHP
Python
Веб-дизайн
Верстка, CSS, HTML, SVG
Системное администрирование
Другие языки и технологии
Лидеры категории
Лена-пена
М.И.
Y.Nine
•••
Искусственный Интеллект
Искусственный Интеллект
Искусственный Интеллект
Pascal. Накатайте несложную программу пожалуйста.
Пользователь удален
(917),
на голосовании
15 лет назад
Из слова "вагонетка" вывести на экран слова "вагон" и "ветка".
Голосование за лучший ответ
Алексей Владимирович
(2865)
15 лет назад
program vagon;
uses crt;
var
vag,s: string;
begin
clrscr;
vag:='Вагонетка';
s:=copy(vag,1,5);
delete(vag,2,4);
writeln(vag);
writeln(s);
readkey;
end.
uses crt;
var
vag,s: string;
begin
clrscr;
vag:='Вагонетка';
s:=copy(vag,1,5);
delete(vag,2,4);
writeln(vag);
writeln(s);
readkey;
end.
Источник: Мозг
Похожие вопросы