написать программу в паскале определяющую является ли четырехугольник квадратом
5-9 класс
|
var a,b,c,d:integer;
begin
writeln('Введите стороны четырехугольника: ');
readln(a,b,c,d);
if (a=b) and (b=c) and (c=a) then writeln('Четырехугольник является квадратом')
else writeln('Четырехугольник не квадрат');
readln;
end.
Другие вопросы из категории
информационный вес одного символа? сколько символов в алфавите языка, на котором записано это сообщение
Автор учебника Л .Л. Босова
символов в строке ?
Читайте также
Составить программу, определяющую, является ли данное утверждение истинным:Ровно одно из чисел А и В не превышает 100
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
1. Написать программу нахождения произведения n чисел.
определите его тип (равносторонний , равнобедренный, разносторонний) СРОЧНО! ЗАРАНЕЕ СПАСИБО.