Помогите пожалуйста решить в Паскале.желательно все но можно несколько.заранее спасибо!!!
5-9 класс
|
1)
var n,k,a:integer;
begin
read(n,k);
n:=n*19;
k:=k*18;
a:=n+k;
writeln(a);
end.
3)
var Y:integer;
X,z,A:real;
begin
read(X,Y);
A:=Y/X;
Z:=Y-X;
writeln('Внук моложе бабушки в ',A,' раз',' ','Бабушка старше внука на ',z,' лет/года');
end.
6)
var x,y,z,n,a,b:integer;
begin
read(x,y,z,n);
a:=x*y;
b:=z*n;
writeln(b,' Женщин',' и ',a,' Мужчин');
end.
7)
var a,t,k,h:integer;
begin
read(a);
t:=a*3;
k:=a*4;
h:=a*6;
writeln(t,' ',k,' ',h);
end.
12)
var y,x:integer;
z,a:real;
begin
read(y,x);
z:=y-x;
a:=z/x;
writeln(a);
end.
Все, что успел. Пиши в личку если, что не понятно..
Другие вопросы из категории
строки по 64 символа в строке?
Ввести
10 чисел. Проверить, есть ли среди введенных ноль. Если есть, вывести на экран
«Есть 0», если нет – «Нет 0».(10 чисел имеется в виду любых десять)
Читайте также
1. Чему равны значения переменных r, a, d?
a:=5; b:=20; c:=-7;
d:=2.5;
r := a+(4*b+c)*d;
a:= a+4;
d:=a*7;
2. В пяти тестовых опросах мальчик получил оценки. Составьте программу, которая определит среднее значение оценок, полученных мальчиком в пяти опросах.
3*. Задача. «Покупка в магазине»
Человек делает в магазине покупки. Определите сколько денег у него останется после покупки в магазине перчаток стоимостью А руб., портфеля стоимостью B руб. и галстука стоимостью D руб. Все исходные данные задаются с клавиатуры.
Исходные данные.
a — стоимость перчаток;
b — стоимость портфеля;
d — стоимость галстука;
dengi — количество денег у человека.
Все эти переменные будут вещественного типа.
Результат.
ostatok — количество денег, которое останется у человек (вещественный тип).
Метод решения.
ostatok = dengi – a – b – d
Написать программу, реализующую данную задачу
Помогите пожалуйсто решить очень срочно!!!!!!
второе задание ну или хотя бы только первое .Это вопрос жизни и смерти помогите пожалуйста P.S задание во вложениях.заранее спасибо и знайте если вы поможете значит вы самый добрый и отзывчивый человечек!)
1)дано натуральное число N>1.найти количество его делителей
2)дано натуральное число N>1.равно ли оно сумме своих делителей(включая единицу,но не себя)
3)даны числа a и n.вычислить:1/a 1/a*a 1/a*a*a ... 1/a*n
это все цикл for,зарание спасибо!