Предмет: Информатика,
автор: PIKACHYYYI
ДАЮ 99 БАЛЛОВ. СРОЧНО!!!
нужно написать программу на языке паскаль по вводу года рождения, нужно идти на выборы или нет. Чтоб если больше 18 то программ говорила что нужно, а если меньше то ненужно
Ответы
Автор ответа:
1
program qq;var a: integer;
begin
write (‘Введите ваш возраст: ’);
readln (a);
if a>=18 then
writeln(‘Вы имеете право голосовать’)
else write(‘Вы не имеете право голосовать’);
end.
begin
write (‘Введите ваш возраст: ’);
readln (a);
if a>=18 then
writeln(‘Вы имеете право голосовать’)
else write(‘Вы не имеете право голосовать’);
end.
PIKACHYYYI:
спасибо
Автор ответа:
1
var a,b: Integer;
begin
writeln('Введите год рождения');
readln(a);
b:=2018-a;
if b>18 then writeln('Можно идти на выборы') else writeln('Нельзя идти на ввборы');
end.
begin
writeln('Введите год рождения');
readln(a);
b:=2018-a;
if b>18 then writeln('Можно идти на выборы') else writeln('Нельзя идти на ввборы');
end.
Похожие вопросы
Предмет: Английский язык,
автор: Аноним
Предмет: Українська мова,
автор: aulili
Предмет: Алгебра,
автор: mazurokyaroslav
Предмет: Математика,
автор: зарина75