Ввести строку и определить, возможно ли её преобразовать в число? - Pascal ABC

  1. тут нужно использовать процедуру val


textual

Код к задаче: «Ввести строку и определить, возможно ли её преобразовать в число? - Pascal ABC»

program m1;
var
  s:string;
  v,k:integer;
begin
  readln(S);
  val(S,v,k);
  If k<>0 then
    Writeln ('Ошибка в позиции ',k,' : ',s[k])
  else
    Writeln ('Значение: ',v);
  readln;
end.

СДЕЛАЙТЕ РЕПОСТ

11   голосов, оценка 3.727 из 5



Похожие ответы
  1. Помогите исправить ошибку . Задание :Сформировать двумерный массив. Удалить из него строку и столбец, на пересечении которых находится минимальный элемент.

  1. Ввести a>=1. Найти значение какого из выражений больше: 1/а чи sin(а). Проверьте пожалуйста.

  1. Дан прямоугольный массив целых положительных чисел. Отыскать в массиве строку с наименьшей суммой элементов. Вывести на печать номер строки и сумму ее элементов. Предполагается, что такая строка единственна.

  1. Дан целочисленный квадратный массив 7х7. Найти строку с наибольшей суммой элементов.

  1. Дана строка(Любое предложение). Зашифровать её, изменив код каждого символа на число N

  1. Дана строка. Вывести строку, состоящую из кодов символов исходной строки, разделенных пробелом.

  1. вводит натуральное число и определяет сумму натуральных чисел

  1. Занятия в школе начинаются в 8-30. Урок длится 45 минут, перерывы между уроками – 10 минут. Ввести номер урока и вывести время его окончания.Пример: Введите номер урока: 6 13-50

  1. Ввести три числа, найти наименьшее отношение этих чисел.