36

Составит программу для вычисление квадрата в четных чисел от 2 до 10

11 марта 2023

Составит программу для вычисление квадрата в четных чисел от 2 до 10

категория: информатика



90

Program VadimLoh; uses crt; var s,k: integer; beginwriteln ('Введи число'); readln (s); If s mod 2=0 thenk: =s*selsewriteln ('Число не четное! '); writeln ('Квадрат числа=',k); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...