Составить программу которая в введенной с клавиатуры строке содержащей не менее трёх символов выводит на экран первых два символа строки
program n_1;
var a,b:integer;
begin
readln(a);
b:=a div 10;
writeln(b);
end.
ой неправильно
напишешь правильно?
program n_1;var s: string;beginwriteln('Напишите число');readln(s);writeln('Первый символ: "', s[1], '" Второй символ: "', s[2], '');end.
вот
спасибо