Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Помогите срочно перевести алгоритмы на Паскаль. Очень нужно срочно

5-9 класс

ранетка1995 08 янв. 2015 г., 6:42:09 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
ТаНюШиК209
08 янв. 2015 г., 8:27:56 (9 лет назад)

1) Определение теплоты 
Var q,i,rt:real;
Begin
   Write('i='); readln(i);
   Write('Rt='); readln(rt);
q:=(i*i)*rt;
   Writeln('Q=',q); 
End.

2) Площадь треугольника
Var s,p,a,b,c:real;
Begin
  Write('A='); readln(a);
  Write('B='); readln(b);
  Write('C='); readln(c);
p:=(a+b+c)/2;
s:=p*(p-a)*(p-b)*(p-c);
s:=sqrt(s);
 Writeln('S=',s);
End.

3)Массив 
 Var mas:array[1500..3700] of integer;
       i,n:integer;
Begin 
for i:=1500 to 3700 do begin
mas[i]:=i;
                                       if (mas[i] mod 206 = 0) then writeln(mas[i]);
end;
end.

Ответить

Другие вопросы из категории

Написать

программу, которая по номеру месяца выдает название следующего за ним месяца
(при т = 1 получаем февраль, 4 — май).

(101,101)

,(1000,1000),(1001,1000),(1011,110),(1100,110),((1100,111),(1011,111),(1011,10),(1001,10),(1001,11),(1010,11),(1010,100),(111,100),(111,10),(101,10),(101,11),(110,11),(110,1001),(111,1001),(111,1000),(10,1000),(10,1001),(11,1001),(11,110),(100,101)-перевести в десятичные коды.

в каком типе цикла тело цикла выполняется пока условие ложно?

А) цикл со счетчиком
Б) цикл с постусловием
В) цикл с предусловием
Г) цикл с рекурсией

Читайте также

Помогите эти задания зависят на оценку за четверть 1) Записать алгоритм распознания среди всех треугольников прямоугольные, если таковых нет

вычислить периметр.

2) Последовательно вводится N целых чисел найти кол-во равных нулю.

помогите очень нужно!

Помогите!Очень нужно)))

В строке символов определить кол-во букв А.
Нужно составить программу на Паскале))

помогите плиз очень нужно:превратите одно слово в другое всякий раз заменяя по одной букве так,чтобы новое слово было существительным в именительном падеже

.
а)ночь-?-?-?-?-?-день
б)рота-?-?-?-?-?-полк
в)бант-?-?-?-?-?-коса
г)бег-?-?-?-?-?-?-?-шаг
д)море-?-?-?-?-?-?-суша
е)миг-?-?-?-?-?-?-?-век
помогите очень нужно,учительница ужасно строгая ненавидит меня помогите!

Ребят,помогите пожалуйста,щедро вознагражу баллами.Очень нужна ваша помощь,нужно сделать сегодня.Таблица перелетов из Москвы в разные города.

Вопросы: 1. В какое количество городов можно долететь менее чем за 4 часа? Ответ записать в ячейку H2 таблицы. 2. Какой процент от всех 5-часовых перелетов составляют 5-часовые перелеты в Египет? Ответ на этот вопрос нужно записать в ячейку H3 таблицы с точностью одного знака после запятой



Вы находитесь на странице вопроса "Помогите срочно перевести алгоритмы на Паскаль. Очень нужно срочно", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.