Решенить задачу по паскаль
1.дано число х вычислите қол квадрат
2.имеется число а , число b в 2 раза больше, определить их сумму, числа целые. Срочно

2
кол квадрат - это что?
Срочно. 2 задачи. С непонятным условием. За 5 баллов.
кол-его квадрат

Ответы и объяснения

2013-11-14T18:42:07+04:00
1) var
x:integer;
begin
readln(x);
writeln(sqr(x));
end.
2) var
a,b:integer;
begin
readln(a);
b:=2*a;
writeln(a+b);
end.
  • SkyBy
  • главный мозг
2013-11-14T18:54:50+04:00
Тут есть два варианте решения, у Вас в задании написано что число Х и число А уже даны, то бишь с клавиатуры вводить их не надо. Тогда 1 вариант решения 1. и 2. задания:
1)
var x: integer;
begin
x:=5; // Поменяйте значение на нужное
writeln ('Квадрат числа ', x, ' = ',sqr(x));
end.
2)
var a,b: integer;
begin
a:=3; // Поменяйте значение на нужное
b:=a*2;
writeln ('Сумма A и B = ', a+b);
end.
2 вариант решения, все значения вводятся с клавиатуры:
1)
var x: integer;
begin
write ('Введите число Х: '); read(x);
writeln ('Квадрат числа ', x, ' = ',sqr(x));
end.
2)
var a,b: integer;
begin
write ('Введите число А: '); read (a);
b:=a*2;
writeln ('Сумма A и B = ', a+b);
end.