Страница 1 из 1

помогите с заданием

Добавлено: 05 ноя 2010, 15:04
Ronn
Вычислить площадь, сторону и высоту правильного треугольника по заданной величине радиуса окружности, описанной около этого треугольника R = 5,125м. Написать универсальную подпрограмму, решающую данную задачу для произвольных значений параметра R.


Написать программу, которая во вводимой с клавиатуры последовательности, состоящей из 20 целых чисел, подсчитывает число элементов, модуль которых больше 1000.


Написать программу, которая по введенному с клавиатуры номеру года и номеру дня недели для 1-го января этого года, выводит на рабочий лист календарь на весь год. Месяца расположить поквартально.


Дана действительная квадратная матрица A порядка N. Поменять местами 3-ий и 4-ой сектора.


В выделенном фрагменте русскоязычного документа текстового процессора Word посчитать количество одинаковых слов.


В текстовом русскоязычном файле убрать все слова, начинающиеся на букву а и одновременно содержащие букву о.

Re: помогите с заданием

Добавлено: 05 ноя 2010, 15:32
Oleg_Rus
2/
for i:=1 to 20 do
read(a);
writeln;
for i:=1 to 20 do
if abs(a)>1000 then write(a,'_');

насчет остальных задач не знаю, надо посидеть и вспомнить, если что пиши в личку или на мыло Oleg_Rus.90@mail.ru

Re: помогите с заданием

Добавлено: 05 ноя 2010, 17:54
flash1989
Если что , обращайтесь
icq: 588002847
email: flash_1989@ukr.net

Re: помогите с заданием

Добавлено: 05 ноя 2010, 18:47
Sheka
Не вопрос, сделаю в лучшем виде! 255507394