Нужно написать программу проверки знания даты основания Санкт-Петербурга.

1 ответ

Посмотреть ответы

DevAdmin

1720

var a,b,c,d:integer;
begin
writeln('Напиши дату основания Санкт-Питербурга(день месяц и год)');
writeln('день');
read(a);
writeln('месяц');
read(b);
writeln('год');
read(c);
if (a=27) and (b=5) and (c=1703) then
writeln('Молодец всё правильно')
else
writeln('Ты где то допустил ошибку');
end.

Хороший ответ

16 декабря 2022 23:07

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Как перевести километры в час в метры в секунду в Паскале... Почему при работе за компьютером необходимо соблюдать правила техники безопастности? какие требования правил техники безопасности являються , по вшему... Что такое форматирование ( в частности для жесткого диска или дискеты) и его виды.... Заполните массив из 10 элементов степенями числа 2 (от 21 до 2N), так чтобы элемент с индексом i был равен 2i. Паскаль... дам 100 баллов. Составьте алгоритмы, под управлением которых робот запросит указанные клетки. При необходимости используйте вспомогательный алгоритм....