сервис вопросов и ответовНаписать программу в Паскаль!
5-9 класс|
|
Прикрепленные изображения
Vippirsonas05ri
22 июня 2014 г., 6:30:21 (9 лет назад)
любимоваааа
22 июня 2014 г., 7:06:01 (9 лет назад)
program by_Relhem;
var
x1,y1,x2,y2,gip1,gip2:real;
begin
writeln ('Введите координату первой точки.');
readln (x1,y1);
writeln ('Введите координату второй точки.');
readln(x2,y2);
gip1:=sqrt(sqr(x1)+sqr(y1));
gip2:=sqrt(sqr(x2)+sqr(y2));
if gip1<gip2 then writeln ('Первая точка ближе')
else writeln ('Вторая точка ближе');
end.
Ответить
Другие вопросы из категории
На соревнованиях по легкой атлетике Андрей, Борис, Сергей и Володя заняли первые четыре места. Но когда девочки стали вспоминать, как эти места
распределились между победителями, то мнения разошлись.
толковый словарь русского языка состоит из 1190 страниц на каждой странице текст расположен в 2 колонки в каждой колонке 75 строк а в каждой строке по 65
символов вычислите количество информации содержащейся в словаре представьте это в количествах в битах байтах и в производных от них единицах
Читайте также
1)найти сумму первых k последовательных нечетных чисел. написать программу в паскале. 2)вывести на экран натуральные нечетные числа от 5 до 55.тоже
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
Помогите написать программу для Паскаля.
1. Написать программу нахождения произведения n чисел.
Паскаль ABC 1.Написать программу рисующую вертикальную цепочку из 7 кругов 2.Написать программу рисующую цепочку из 5 кругов
расположденных по диагонали
3.Написать программу рисующую горизонтальную цепочку из 12 кругов,каждый круг должен на половину закрывать предыдущий
Помогите,а то сижу с паскалем уже час с лишним и все никак не получается..
Заранее спасибо)
Паскаль абс 2 задачи 1)Написать программу выводящую на экран последовательность чисел от 1 до 10 через пробел в строчку.
2)Написать программу которая бы выводила на экран произведение нечетных чисел от 10 до 20.
Помогите написать программу на Паскале.
Напишите программу, которая в последовательности целых чисел
вычисляет сумму всех чисел, которые кратны 6 или 11. Программа получает на вход
целые числа, количество введённых чисел неизвестно, последовательность чисел
заканчивается числом 0 (0 – признак окончания ввода, не входит
в последовательность).
Количество чисел не превышает 1000. Введённые числа по
модулю не превышают 30 000.
Программа должна вывести одно число: сумму всех чисел,
которые кратны 6 или 11.
Вы находитесь на странице вопроса "Написать программу в Паскаль!", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.