сервис вопросов и ответовнаписать по возможности одну программу для паскаль
5-9 класс|
|
Typu72gaujc
22 дек. 2013 г., 21:00:54 (10 лет назад)
Gala1986
22 дек. 2013 г., 22:25:04 (10 лет назад)
пример программы для паскаль
Program a;
const n = 50;
var
i:byte;
B:array[1..n] of word;
procedure proc(A:array of word);
begin
for i:=1 to n do
if((129 <= A[i]) and (A[i] <= 160)) or
Vesta25
23 дек. 2013 г., 0:32:19 (10 лет назад)
программа, выводящая на экран номер четверти координатной плоскости, которой принадлежит точка с координатами х≠0 и у≠0
program 198;
var x,y: real;
begin;
readln (x; y);
if x>0 and y>0 then
writeln (1 chetvert);
end;
if x<0 and y>0 then
writeln (2 chetvert);
end;
if x<0 and y<0 then
writeln (3 chetvert);
end;
if x>0 and y<0 then
writeln (4 chetvert);
end;
end.
Ответить
Другие вопросы из категории
Запишите алгоритм циклического обмена значениями трех переменных a,b.c. Схема циклического обмена a->b->c Например, если до обмена было
a=1,b=2,c=3, то после обмена должно стать a=3,b=1,c=2. Выполнить трассировку.
Алгоритм: Трассировочная таблица:
Читайте также
НАПИШИТЕ ПРОГРАММУ В ПАСКАЛЕ, СРОЧНО !!
написать программу, которая вычисляет среднее арифметическое ненулевых элементов массива M[1..100], элементы которого вычисляются по формуле M[i]=sin(i)*cos(i)
и прошу не используйте интернет, а напишите сами по возможности.
Пожалуйста помогите создать какую нибудь полезную программу на паскаль , срочно нужно до понедельника, чтобы в этой программе были все темы за 8 класс,
read.writeln.else.to.if и тд которые сможете
Вот пример идеи для программы, в академию поступают какое то количество учеников, нужно написать сколько учеников сдали документы, сколько пришли на экзамен, и сколько учеников кто прошло и не прошло
возможно не возможно создать программу на этой идее, тогда прделагайте свои со своими программами , пожалуйста помогите!
Помогите написать программу для Паскаля.
1. Написать программу нахождения произведения n чисел.
составить на Паскале: 1) программу для вычисления суммы ряда S=1+ 1/2+1/3+1/4+..+1/N. Число N вводится с клавиатуры. 2) одноклеточная
амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.
3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).
4) написать программу для вычисления n-ой степени числа А.
помогите, пожалуйста)
Помогите , пожалуйста . Нужно написать программу для Паскаль.
Ввести пять чисел и найти наибольшее из них.
Я тут написал кое-что ,но не знаю правильно ли :(
HELP ME.
program ru;
var a,b,c,d,e,max:integer;
begin
writln('Введите пять целых чисел');
if a>b then
begin
max:=a;
end
else begin
max:=b;
end;
if max>c then
begin
max:=max;
else begin
max:=c;
end;
if d>e then begin
max:=d;
end
else begin
max:=e;
end.
Вы находитесь на странице вопроса "написать по возможности одну программу для паскаль", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.