Помогите пожалуйста! 1.Дано три положительных числа.Проверить можно ли построить прямоугольный треугольник с заданными сторонами. 2.Проверить делится ли
5-9 класс
|
данное число на 13.
Задача №1 (написанная на паскале)
uses crt;
var
a, b, c: real;
begin
readln (a, b, c);
a:= a*a;
b:= b*b;
c:= c*c;
if (a+b=c) or (b+c=a) or (c+a=b)then writeln ('Mozhno') else writeln('oshipka postroenie');
readkey;
end.
Задача №2.(написанная на паскале)
uses crt;
var
a : integer;
begin
readln (a);
if (a mod 13 =0) then writeln ('da') else writeln ('net');
readkey;
end.
Другие вопросы из категории
расходуется С кг краски. Каждая банка содержит D кг. Помогите Тому Сойеру определить количество банок краски, которые ему потребуются для покраски забора.
Входные данные:
Во входном потоке в первой строке через пробел заданы пять целых чисел (N, A, B, C, D <= 1000).
Выходные данные:
Вывести единственное число.
Пример входного файла (input.txt):
10 1 1 2 3
Пример выходного файла (output.txt):
14
Задание: По алгоритму умножения двух заданных чисел постройте блок-схему. Какие блоки Вы использовали?
умножения; 2) каждое выражение может содержать только одну арифметическую операцию
Нужно решить 2 номер и ещё если можно 3. Желательно в письменном виде. Заранее спасибо.
Читайте также
Задача: Дано одно целое число, проверить, является ли оно простым. (делится на 1 и на само себя).
Помогите пожалуйста)
тов.
ПОМОГИТЕ ПОЖАЛУЙСТА!!!с помощью паскаля, а числа задавать можно любым способом.
сел - отрицательное, то найти Iа+ b+cI иначе а+b+c +d в корне.
Даны три числа. Если произведение данных чисел - отрицательное, то каждое число возвести в квадрат, иначе найти модуль каждого числа
ПОМОГИТЕ ОЧЕНЬ ПРОШУ
файла.Результат поместить в файл g.
дан файл f компоненты которого являются целыми числамию Найти наибольший и наименьший из компонентов файла.результат поместить в файл g
ДАн файл f компоненты которого являются целыми числами найти количество чётных чисел среди компонентов.результат поместить в файл g
Дан файл F компоненты которого являяются целыми числами.записать в файл g все чётных числа файла f
Дан файл F компоненты которого являяются целыми числами переписать компоненты файла f в файл g,так чтобы в файле сначала шли отрицательные а потом положительные числа.
Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить среднее арифметическое вещественных чисел...
ПАСКАЛЬ,ПОМОГИТЕ ПОЖАЛУЙСТА