Помогите с заданием! Проверить является ли фрагмент строки с i-го по j-й символ палиндромом.
Код к задаче: «Проверка фрагмента»
Листинг программы
uses crt; var i, j : byte; s, s1 : string; bol : boolean; begin clrscr; write(‘Введите строку : ‘); readln(s); write(‘Введите i, j : ‘); readln(i,j); if (i>length(s)) and (j>length(s)) then begin writeln(‘Ошибка ввода.’); readln; exit; end; s1 := copy(s,i,j-i+1); bol := true; for i := 1 to length(s1) div 2 do if s1[i] <> s1[length(s1) — i + 1] then begin bol := false; break; end; if bol then writeln(‘Фрагмент является полиндромом.’) else writeln(‘Фрагмент не является полиндромом.’); readln; end.
7 голосов , оценка 3.857 из 5
Источник: studassistent.ru
Выбрать фрагмент программы на паскале в котором
Как сделать игру в которой ты должен отгадать цифру | Pascal N-IDE
June 2022 1 8 Report
Выбрать фрагмент программы на языке программирования Паскаль, в котором вычисляется значение функции:
1)if X > –5
then begin if X < 5
then Y:=0
else Y:=1;
end;
2)if X < –5
then if X < 5
then Y:=0;
Y:=1;
3)if X > –5
then Y:=0
else Y:=1;
if X < 5 then Y:=1;
Y:=1;
4)if X > –5
then if X < 5
then Y:=0;
Answers https://scholar.tips/vybrat-fragment-programmy-na-yazyke-programmirovaniya-paskal-v-kotorom-vychislyae.html» target=»_blank»]scholar.tips[/mask_link]
ГДЗ по Информатика 9 класс Семакин, Залогова, Русакова § 18. Массивы в Паскале
Массив на Паскале, в котором будут храниться значения численности населения Москвы к концу каждого года XX века, можно описать следующим образом:
var
population: array[1900..1999] of integer;
В данном примере мы создаем массив population типа integer с размерностью от 1900 до 1999 (включительно), в котором будут храниться значения численности населения Москвы к концу каждого года в XX веке.
2. Вы приобрели котенка. Каждый вечер вы определяете его вес с помощью весов. Как можно описать на Паскале массив, в котором будут храниться значения веса котенка в течение месяца (например, мая)?
Массив на Паскале, в котором будут храниться значения веса котенка в течение месяца, можно описать следующим образом:
var
weight: array[1..31] of real;
В данном примере мы создаем массив weight типа real с размерностью от 1 до 31 (число дней в месяце), в котором будут храниться значения веса котенка в течение месяца.
3. Напишите фрагмент программы на Паскале ввода исходных данных для массивов, определенных в заданиях 1 и 2.
var
population: array[1900..1999] of integer;
weight: array[1..31] of real;
i, day: integer;
begin
// Ввод значений для массива population
Pascal ABC Составление алгоритмов с помощью готовых фрагментов Изменение готовых алгоритмов Испол
for i := 1900 to 1999 do
begin
writeln(‘Введите численность населения Москвы к концу года ‘, i, ‘: ‘);
readln(population[i]);
end;
// Ввод значений для массива weight
for day := 1 to 31 do
begin
writeln(‘Введите вес котенка за ‘, day, ‘ число мая: ‘);
readln(weight[day]);
end;
end.
В данном примере мы используем циклы for для ввода значений в массивы population и weight. Внутри циклов мы используем процедуры writeln и readln для вывода сообщений на экран и ввода значений с клавиатуры.
4. Введите в компьютер программу Temperature, добавив к ней обработку массива Dt. Выполните программу, получите результаты. Сравните их с приведенными в параграфе.
5. Составьте программы на Паскале по алгоритмам из заданий 3, 4 предыдущего параграфа. Выполните эти программы на компьютере.
Источник: izi-otvet.ru