Предмет: Информатика,
автор: sonechko6006
1.Составить текст программы
a:=upcase (PASCAL);
writeln(a)
помогите пожалуйста паскаль
Ответы
Автор ответа:
1
var
a:string;
i:integer;
begin
a:='pascal';
write('Исходная строка: ', a, #10);
for i:= 1 to length(a) do
a[i]:=upcase(a[i]);
writeln('Модифицированная строка: ', a);
end.
Приложения:
Интересные вопросы
Предмет: Русский язык,
автор: livalentina2017
Предмет: Русский язык,
автор: Аноним
Предмет: Русский язык,
автор: nikitakaraev20
Предмет: Геометрия,
автор: talihanpredator2010
Предмет: Английский язык,
автор: Аноним