Катя Боровкова
Катя Боровкова

Составить программу в Паскаль

составить программу которая вводит номер телефона если введен ваш номер выводится сообщение "номер правильный "в противном случае" номер не ваш"

Александр
Александр

readln(nomer);
if (nomer = 12345678) then writeln('номер правильный') else writeln('номер не ваш') ;

ЕБ
Екатерина Бабурина

const NT = "263646";
var S : String;
begin
Write('Введите номер телефона (только цифры) : '); ReadLn(S);
if S = NT then
WriteLn('Номер правильный! ')
else
WriteLn('Номер не мой! ');
end.

А у предыдущего аффтара не пройдёт!
Ибо целочисленные переменные максимум до 8-9 цифр, а если номер телефона сотовый?

Похожие вопросы
Помогите составить программу в паскале
Составить программу для паскаль
Паскаль. Составить программу
Составить программу в Паскале.
составить программу на Паскаль
составить программу на паскале
Как составить программу на Паскале?
как составить программу в паскале
Составить программу в паскале!
Составить программу на паскале: