Создайте 5 переменных типа char, предложите пользователю ввести слово из пяти букв и покажите эти символы (слово) на экран. (символы вводить латиницей, т.к. кирилица будет отображаться некорректно.
1) на c++ #include <iostream> using namespace std; int main() { char a=0,b=0,c=0,d=0,e=0; cout<<"enter the word which have 5 letters: "<<endl; cin>>a>>b>>c>>d>>e; cout<<"you word: "<<a<<b<<c<<d<<e<<endl; return 0; } 2) на PascalABC.Net Program n1; var a,b,c,d,e: char; begin write('enter the word which have 5 letters: '); readln(a,b,c,d,e); write('you word: ',a,b,c,d,e); end.
// PascalABC.NET 3.3, сборка 1600 от 23.12.2017 // Внимание! Если программа не работает, обновите версию!
begin var a:=ReadlnChar('Введите 1-й символ и нажмите Enter:'); var b:=ReadlnChar('Введите 2-й символ и нажмите Enter:'); var c:=ReadlnChar('Введите 3-й символ и нажмите Enter:'); var d:=ReadlnChar('Введите 4-й символ и нажмите Enter:'); var e:=ReadlnChar('Введите 5-й символ и нажмите Enter:'); Writeln(a,b,c,d,e) end.
#include <iostream>
using namespace std;
int main()
{
char a=0,b=0,c=0,d=0,e=0;
cout<<"enter the word which have 5 letters: "<<endl;
cin>>a>>b>>c>>d>>e;
cout<<"you word: "<<a<<b<<c<<d<<e<<endl;
return 0;
}
2) на PascalABC.Net
Program n1;
var a,b,c,d,e: char;
begin
write('enter the word which have 5 letters: ');
readln(a,b,c,d,e);
write('you word: ',a,b,c,d,e);
end.
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadlnChar('Введите 1-й символ и нажмите Enter:');
var b:=ReadlnChar('Введите 2-й символ и нажмите Enter:');
var c:=ReadlnChar('Введите 3-й символ и нажмите Enter:');
var d:=ReadlnChar('Введите 4-й символ и нажмите Enter:');
var e:=ReadlnChar('Введите 5-й символ и нажмите Enter:');
Writeln(a,b,c,d,e)
end.