Задано число от 0 до 99, если число двузначное, то вывести первую цифру числа, если однозначное, то само число.
Паскаль
Ответы
Ответ дал:
0
Ответ:
var
p,r,i,k,o,l,u,h,a:integer;
s:string;
begin
writeln ('INP');
readln (k); / вводим цифру
if (k >= 10) then begin // проверка на двухзначность
Str(k,s); // перевод в строку
writeln (s[1]); // вывод
end
else writeln (k); // если не больше 10
readln
end.
Объяснение:
Ответ дал:
0
За end извиняюсь, не увидел второго бегин, однако за s1 и INP не понял
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад