Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
pзадача паскаль
помогите составить задачу: с начала суток прошло N секунд (N - целое). Найти количество полных минут. N=524.

Дано четырёхзначное (3569) число. Проверить истинность высказывания: " данное число читается одинаково слева направо и справа налево.
1 | Автор: evgenii | 2011-10-27, 12:43 | Изменено: evgenii - Чт, 2011-10-27, 12:46   |  Репутация: [ + 0 ]
1.
var
n:integer;
begin
read(n);
writeln(n mod 60);
end.

2.
var
a,s:string[4];
begin
readln(a);
s[1]:=a[4];s[2]:=a[3];s[3]:=a[2];s[4]:=a[1];
if s=a then writeln('yes') else writeln('no');
end.

"Спасибо" принимается в виде повышения репутации ( Зелёный плюсик:) ). Спасибо


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2011-10-27, 15:59   |  Репутация: [ + 211 ]
  • Страница 1 из 1
  • 1
Поиск: