Помогите, получить зачет - Форум
Пятница, 09.12.2016, 10:44
Задачи по информатике
Главная | Регистрация | Вход Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Модератор форума: ignorer, KOT_B_MEIIIKE, PASCAL26, atvrider 
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » Помогите, получить зачет
Помогите, получить зачет
VoRoBeYДата: Четверг, 23.12.2010, 14:20 | Сообщение # 1
Рядовой
Группа: Новичок
Сообщений: 2
[ 0 ]
Статус: Offline
Помогите кто знает надо срочно решить задачку в Pascal . Завтра последний шанс получить зачет по информатике. Задачка звучит так :
Дан массив из слов A(m). Найти все слова с длиной, не превышающей заданной.
Помогите решить пожалуйста, очень нужен зачет!!
 
NailДата: Четверг, 23.12.2010, 15:30 | Сообщение # 2
Генералиссимус
Группа: Заблокированные
Сообщений: 127
[ 0 ]
Статус: Offline
Напишу не дорого.
Mail: shakurovnail@mail.ru
Icq: 6688101
 
VoRoBeYДата: Четверг, 23.12.2010, 16:36 | Сообщение # 3
Рядовой
Группа: Новичок
Сообщений: 2
[ 0 ]
Статус: Offline
а за бесплатно скажешь правильно это или нет?
var a:array [1..6] of string;
i,x:integer;
begin
write('Введите максимальное колличество символов');
read(x);
for i:=1 to 6 do read(a[i]);
for i:=1 to 6 do
if length(a[i])<=x then writeln(a[i]);
 
NailДата: Четверг, 23.12.2010, 16:44 | Сообщение # 4
Генералиссимус
Группа: Заблокированные
Сообщений: 127
[ 0 ]
Статус: Offline
Сделаю за 50 рублей. Бесплатное уже оплаченное.
 
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » Помогите, получить зачет
Страница 1 из 11
Поиск:

Copyright MyCorp © 2016