информатика 10 класс..
10-11 класс
|
Составьте программу, которая:
а) определяет коды двух введенных с клавиатуры символов;
a) Program PRIMER;
Uses crt;
var a, b: char;
begin
write('Введите первый символ a = ');
readln(a);
write('Введите второй символ b = ');
readln(b);
writeln;
write('Код символа a = ', ord(a), ', код символа b ', ord(b));
readln;
end.
в)
Program primer2;
uses crt;
var a,b,c: char;
begin
write('Введите чила a, b, c = ');
readln(a,b,c);
writeln('Результат сцепления: ', a+b+c);
end.
Другие вопросы из категории
начиная с N>0. N вводится с клавиатуры
Все говорят, что легко, а я сделать не могу :(
function find(x:integer):boolean;
begin
if pos('7',IntToStr(x))=0
then result:=False
else result:=True
end;
const n = 1000;
var
a:array[1..n] of integer;
i:integer;i,o: file of text;
begin
AssignFile(i, 'Input.dat');
AssignFile(o, 'Output.dat');
Rewrite(o);
Reset(i);
for i:=1 to n do
Читайте также
Это информатика, 10 класс
Вопросы на фотографии
Номера 5 и 6 не надо решать