1. Информатика
  2. Составить программу, которая

Составить программу, которая определяет код введенного с клавиатуры символа s и m

denissss2222 denissss2222    3   12.08.2019 10:20    0

Ответы
Grayr2005 Grayr2005  04.10.2020 13:12

var a, b: char;

begin

  writeln('Введите первый символ');

  readln(a);

  writeln('Введите второй символ');

  readln(b);

  writeln('Код первого символа равен ', ord(a), ', код второго символа равен ', ord(b));

end.

так попробуй

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ismatov031 ismatov031  02.10.2019 19:13
Исполнитель июнь 15 преобразует числа на экране. у исполнителя есть две команды, которым присвоены номера: 1.прибавить 12.прибавить 23.прибавить 3программа для исполнителя...
MiSTiK338 MiSTiK338  02.10.2019 19:12
Вопрос загадка для поиска в интернете...
NastyaKoryak NastyaKoryak  03.03.2020 12:19
N школьников делят между собой k яблок поровну, неделящийся остаток остаётся в корзинке. Сколько яблок достанется каждому школьнику? Сколько яблок останется в корзинке?...
DimaLim DimaLim  16.06.2019 14:50
Как перевести 0,654 в двоичную систему исчисления?...
ismoilova97 ismoilova97  16.06.2019 14:50
Одномерный массив 7 элементов заполнить случайным образом числами от 5 до 35. заменить все элементы массива больше 15 восьмерками,а элементы равные 5 нулями.вывести на...
polinasenotova polinasenotova  16.06.2019 14:50
Даны два трехзначных числа. найдите шестизначное число, образованное из двух данных чисел путем дописывания второго числа к первому справа. с решением,...
Ельтерник Ельтерник  16.06.2019 14:50
Людмила защищает свои пароли так: двигаясь от краев пароля к его центру, она меняет местами каждую вторую пару символов. например, пароль pas sword превращается в prsws...
Кыкук Кыкук  16.06.2019 14:50
Одномерный массив из 12 элементов заполнить случайным образом числами от 0 до 50. если пятый элемент таблицы меньше десятого элемента,то присвоить этим элементам удвоенное...
касымжомарттокаев1 касымжомарттокаев1  16.06.2019 14:50
:определить сумму элементов матрицы кратных 3 вот решение : program crh; const n=5; m=6; var a: array [1..n,1..m] of integer; i,s: integer; begin for i: = 1 to n do for...
Myziki Myziki  21.01.2021 20:07
для каждого из ложных условий задания 2 придумайте обстановку в которой данное условие будет верным а для каждого истинного обстановку в которой условие будет ложным (фото...

Популярные вопросы