Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 27.10.2018, 18:23   #1
артем2
Новичок
 
Регистрация: 27.10.2018
Сообщений: 1
Репутация: 10
По умолчанию Помогите совместить вместе 2 программи

var
i:integer;
s:string;

begin
readln(i);
for i:=1 to i do
readln(s);
write(s[length(s)]);
end.

------------------------------------
var
a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 5 do
read(a[i]);
if a[1]=a[3] then writeln('true')
else writeln('false');
end.
артем2 вне форума   Ответить с цитированием
Старый 27.10.2018, 23:43   #2
digitalis
Профессионал
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Адрес: Минск
Сообщений: 1,033
Репутация: 392
По умолчанию

Как нефиг нафиг:
Код:

var
i:integer;
s:string;
a:array[1..10] of integer;

begin
readln(i);
for i:=1 to i do
readln(s);
write(s[length(s)]);

for i:=1 to 5 do
read(a[i]);
if a[1]=a[3] then writeln('true')
else writeln('false');

end.

digitalis вне форума   Ответить с цитированием
Старый 30.10.2018, 13:04   #3
digitalis
Профессионал
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Адрес: Минск
Сообщений: 1,033
Репутация: 392
По умолчанию

< телепатический прием >
Да пожалуйста. Обращайся ежели что.
digitalis вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как узнать системные требования к программи Sylar9 Общие вопросы C/C++ 4 19.03.2012 22:46
Сетевые программи Farhod Общие вопросы .NET 7 23.04.2010 21:44
Загрузить библиотеку вместе сразу вместе с программой Anekdot Общие вопросы Delphi 4 27.01.2010 00:14
компоновка ассемблерных модулей с программи С++ brainFuck Assembler 2 08.09.2008 09:10
Вопрос о времени работи программи terminadoor Помощь студентам 1 05.08.2008 11:42


03:47.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru