Пожалуйста, помогите написать программу для Pascal abc
5-9 класс
|
var x,y,d:integer;
begin
writeln('Введите величину Х');
readln(x);
writeln('Введите величину Y');
readln(y);
writeln('Введите величину D');
readln(d);
if (x>=d) and(y>=d) then writeln('Удастся')
else writeln('Не удастся');
end.
Другие вопросы из категории
таблице наблюдений определите тип входных данных и правило, по которому осуществляется их преобразование
что изображения использовалось 256 цветов
Тут задача, в которой нужно ввести верно пароль, ну дак вот нужно составить похожую программу, но так что-бы было 3 попытки ввода пароля, ну и после этих попыток будет например "Вы ввели не верный пароль, попытки исчерпаны"
можно сделать через string
------------------------
program
test1;
var
x,y:integer;
begin
y:=555;
repeat
writeln(‘введите
пароль’);
readln(x);
until y=x
writeln(‘Поздравляем,
вы ввели пароль верно’);
end.
Читайте также
1. Написать программу нахождения произведения n чисел.
С начала суток прошло N секунд (целое). Найти кол-во полных часов, прошедших с начала суток.
амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.
3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).
4) написать программу для вычисления n-ой степени числа А.
помогите, пожалуйста)