ПОМОГИТЕ С ИНФОРМАТИКОЙ, пожалуйста
1) Организовать ввод своей фамилии, имени, отчества в трех строковых переменных. При помощи склейки получить новую переменную (из трех введенных) и найти длину этой переменной.
3) При помощи функции копирования и склейки из слова «интеграл» составить слова: ГАНТЕЛИ, РЕНТГЕН, ТИГР, АГЕНТ, РАЛЛИ, ИГРА, НИТРАТ.
Задание 1)
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
var fam:=ReadlnString(Фамилия:);
var nam:=ReadlnString(имя:);
var otch:=ReadlnString(отчество:);
var fio:=fam+ +nam+ +otch;
Writeln(fio,, длина текста- ,fio.Length)
end.
Тестовое решение
Фамилия: Иванов
имя: Сергей
отчество: Петрович
Иванов Сергей Петрович, длина текста- 22
Задание 3)
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
var w:=ИНТЕГРАЛ;
Writeln(w[5]+w[7]+w[2:5]+w[8]+w[1]);
Writeln(w[6]+w[4]+w[2:4]+w[5:3:-1]+w[2]);
Writeln(w[3]+w[1]+w[5:7]);
Writeln(w[7]+w[5:3:-1]+w[2:4]);
Writeln(w[6:]+w[8]+w[1]);
Writeln(w[1]+w[5:8]);
Writeln(w[2::-1]+w[3]+w[6:8]+w[3])
end.
Решение:
ГАНТЕЛИ
РЕНТГЕН
ТИГР
АГЕНТ
РАЛЛИ
ИГРА
НИТРАТ
Оцени ответ
